Metrics for Henrywood and Agarwal, Equation (12)

start0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

analyze537.0ms (3.1%)

Memory

-22.1MiB live, 603.1MiB allocated

Algorithm

1×

Search

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

Compiler

Compiled 37 to 24 computations (35.1% saved)

sample5.8s (33.9%)

Memory

49.8MiB live, 6 666.8MiB allocated

Samples

2.3s	13 122×	0	invalid
2.1s	8 256×	0	valid

Precisions

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

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

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

ival-pow: 745.0ms (23.5% of total)

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

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

exact: 20.0ms (0.6% of total)

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

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

Bogosity

explain325.0ms (1.9%)

Memory

-21.1MiB live, 740.2MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
66	-	4	(4.929058591695838e-30 4.4119672756072746e+184 8.477189424527844e+291 2.910563079575886e+212 -1.5310426972247442e+283)	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
57	-	3	(5.571354859660076e-289 1.1994876984969292e+29 1.9821262404729995e+280 -1.2839060645071266e-142 -3.105006729401294e-254)	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
32	-	2	(-1.0873722065259393e+218 -2.553076604211717e+27 -6.246213172375598e-58 -2.2783396753970578e-99 -1.5707376968820165e+161)	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`
27	-	0	-	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
24	-	1	(6.091328137137336e-192 4.963671496596431e+88 5.795138117323498e-151 -3.726559963602333e-170 -4.58058204213774e-147)	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`
0	-	0	-	`D`
0	-	0	-	`(*.f64 #s(literal 2 binary64) d)`
0	-	0	-	`(/.f64 h l)`
0	-	0	-	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`
0	-	0	-	`d`
0	-	0	-	`#s(literal 1 binary64)`
0	-	0	-	`(/.f64 d l)`
0	-	0	-	`(*.f64 M D)`
0	-	0	-	`(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))`
0	-	0	-	`(/.f64 d h)`
0	-	0	-	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))`
0	-	0	-	`#s(literal 2 binary64)`
0	-	0	-	`l`
0	-	0	-	`(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))`
0	-	0	-	`M`
0	-	0	-	`h`
0	-	0	-	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	34	0
↳	`(/.f64 d l)`	underflow	34
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	32	0
↳	`(/.f64 d h)`	overflow	32
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	28	0
↳	`(/.f64 d l)`	overflow	28
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	22	0
↳	`(/.f64 d h)`	underflow	22
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*uo**	15	0
↳	`(/.f64 d h)`	underflow	22
↳	`(/.f64 d l)`	underflow	34
↳	`(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))`	underflow	22
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	80
↳	`(.f64 (/.f64 #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	80
↳	`(/.f64 h l)`	overflow	21
↳	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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	87
↳	`(.f64 (.f64 (/.f64 #s(literal 1 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	87
↳	`(*.f64 M D)`	overflow	36
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	48
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	o/n	11	0
↳	`(*.f64 M D)`	overflow	36
`*.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**	10	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))`	*no**	6	0
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	*ou**	4	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	80
↳	`(.f64 (/.f64 #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	80
↳	`(*.f64 M D)`	overflow	36
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	48
↳	`(/.f64 h l)`	underflow	23
`*.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**	2	0
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	u/n	1	0
↳	`(*.f64 M D)`	underflow	30

Confusion

	Predicted +	Predicted -
+	70	2
-	38	146

Precision

0.6481481481481481

Recall

0.9722222222222222

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	70	0	2
-	38	0	146

Precision?

0.6481481481481481

Recall?

0.9722222222222222

Freqs

test

number	freq
0	148
1	67
2	26
3	14
4	1

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

93.0ms

512×

valid

Compiler

Compiled 352 to 70 computations (80.1% saved)

Precisions

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

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

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

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

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

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

exact: 1.0ms (1.5% of total)

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

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

preprocess142.0ms (0.8%)

Memory

33.8MiB live, 228.7MiB allocated

Algorithm

1×	egg-herbie

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Calls

Call 1

Inputs

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

Outputs

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

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

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

2.0MiB live, 2.0MiB allocated

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

72.7%

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

Compiler

Compiled 40 to 22 computations (45% saved)

simplify114.0ms (0.7%)

Memory

-16.4MiB live, 181.3MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

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

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Calls

Call 1

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

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

localize60.0ms (0.3%)

Memory

18.9MiB live, 142.0MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	6.577116361978389	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
accuracy	7.212226895172746	(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy	13.17521895954578	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	15.296896683108013	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

45.0ms

256×

valid

Compiler

Compiled 156 to 24 computations (84.6% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

series69.0ms (0.4%)

Memory

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

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

Calls

15 calls:

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

simplify141.0ms (0.8%)

Memory

23.7MiB live, 212.4MiB allocated

Algorithm

1×	egg-herbie

Rules

6 660×	`lower-fma.f64`
6 660×	`lower-fma.f32`
5 620×	`lower-*.f64`
5 620×	`lower-*.f32`
3 426×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	120	3277
1	321	3193
2	1145	3183
3	2621	3164
4	5465	3164
0	8512	3125

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

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

rewrite228.0ms (1.3%)

Memory

-31.0MiB live, 308.8MiB allocated

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	22	64
0	38	60
1	124	59
2	828	59
0	8726	58

Stop Event

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

Counts

6 → 603

Calls

Call 1

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

eval140.0ms (0.8%)

Memory: -0.5MiB live, 271.4MiB allocated
Compiler: Compiled 32 235 to 2 664 computations (91.7% saved)

prune167.0ms (1%)

Memory

18.0MiB live, 419.8MiB allocated

Pruning

32 alts after pruning (32 fresh and 0 done)

	Pruned	Kept	Total
New	777	32	809
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	778	32	810

Accuracy

91.8%

Counts

810 → 32

Alt Table

Click to see full alt table

Status	Accuracy	Program
	20.3%	(fma.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) h) (.f64 (/.f64 #s(literal 1 binary64) l) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))))
▶	19.8%	(fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	48.3%	(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
	47.9%	(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
	29.9%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	22.0%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
	28.9%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	47.7%	(.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))))
	48.4%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
▶	74.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
	68.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))))))
▶	61.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 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))))
	52.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 (.f64 (.f64 M M) h) D) D) (/.f64 #s(literal 1/8 binary64) (.f64 l (*.f64 d d)))))))
	43.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	34.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	72.7%	(.f64 (.f64 (pow.f64 (/.f64 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))))
	42.3%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	35.1%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	72.6%	(.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))))
	42.3%	(.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))))
	42.3%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	18.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (.f64 D D)) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)))
	31.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 (.f64 (.f64 h h) h) (.f64 (.f64 l l) l))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
▶	13.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l)))
	13.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d))
	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (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 (.f64 (.f64 l l) h) l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 h h) l) h))) d)) h))
	13.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 (/.f64 M (.f64 d d)) M) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (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 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l)))))
	15.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))))
▶	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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	31.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))

Compiler

Compiled 2 336 to 1 420 computations (39.2% saved)

simplify126.0ms (0.7%)

Memory

19.1MiB live, 209.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

6 628×	`lower-*.f32`
6 572×	`lower-*.f64`
3 616×	`lower-/.f32`
3 586×	`lower-/.f64`
1 306×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	82	706
0	139	690
1	283	650
2	901	640
3	2964	640
4	6454	640
0	8043	633

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

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

localize238.0ms (1.4%)

Memory

-6.5MiB live, 448.2MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	9.970514593201719	(.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64)))
accuracy	11.304376789698198	(.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))
accuracy	13.17521895954578	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	15.296896683108013	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	14.571136881654382	(/.f64 (.f64 d d) (.f64 h l))
accuracy	14.6536303924522	(fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
accuracy	15.958959688387514	(/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (*.f64 d d))
accuracy	18.886667209593334	(sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))
accuracy	18.709061270011464	(sqrt.f64 (*.f64 l h))
accuracy	21.824209332480752	(/.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 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))
accuracy	22.19603236532944	(sqrt.f64 (.f64 (/.f64 l h) (.f64 l l)))
accuracy	34.64745961229978	#s(approx (* (* (pow (/ d 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 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l)))
accuracy	0.21484375	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
accuracy	0.7312122349895899	(/.f64 #s(literal 1 binary64) (*.f64 l h))
accuracy	18.911760502718256	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
accuracy	47.00430685571913	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 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	5.461722243270007	(/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
accuracy	6.577116361978389	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
accuracy	13.17521895954578	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	15.296896683108013	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

170.0ms

256×

valid

Compiler

Compiled 711 to 77 computations (89.2% saved)

Precisions

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

ival-mult: 65.0ms (50% of total)

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

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

ival-sqrt: 6.0ms (4.6% of total)

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

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

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

exact: 1.0ms (0.8% of total)

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

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

series155.0ms (0.9%)

Memory

29.1MiB live, 302.7MiB allocated

Counts

24 → 960

Calls

Call 1

Inputs
#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 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 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())
#s(alt (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())
#s(alt (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 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())
#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())
#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<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/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #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 (/ 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 #s(approx (* (* (pow (/ d 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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 h) (#s(alt (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 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h) (taylor 0 h) (#s(alt (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 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h) (taylor 0 h) (#s(alt (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 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) h) (taylor 0 h) (#s(alt (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 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<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 (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 h) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 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/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 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 (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3)))))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3)))))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3)))))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<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 (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf h) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 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/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 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 (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h))))))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h))))))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h))))))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<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 (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf h) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 M) (#s(alt (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 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -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 (/ 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 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<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 (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 l) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (/ 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 (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf l) (#s(alt (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 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))) (taylor inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<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 (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf l) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* 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 (/ 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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) (patch (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) #<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 (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf l) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow M 2) h) l)) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 D) (#s(alt (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 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D 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 h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d) (taylor 0 d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.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 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor 0 d) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D 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 h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf d) (#s(alt (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 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))) (taylor inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor inf d) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D 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 h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) (patch (/.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 (/.f64 l h) (.f64 l l))) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor -inf d) (#s(alt (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 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (.f64 (/.f64 l h) (.f64 l l))) d)) (patch (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 (/.f64 l h) (.f64 l l))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.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 (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch (fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) (patch (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) (patch (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (patch (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) (* h l)) (taylor -inf d) (#s(alt (/.f64 (.f64 d d) (.f64 h l)) (patch (/.f64 (.f64 d d) (.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) (patch (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d))) #<representation binary64>) () ())) ())

Calls

15 calls:

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

simplify181.0ms (1.1%)

Memory

-42.3MiB live, 254.6MiB allocated

Algorithm

1×	egg-herbie

Rules

6 478×	`lower-*.f64`
6 478×	`lower-*.f32`
4 060×	`lower-/.f32`
4 060×	`lower-/.f64`
3 724×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	230	15480
1	688	14946
2	2493	14825
3	5675	14783
0	8498	14489

Stop Event

1×	iter limit
1×	node limit

Counts

960 → 960

Calls

Call 1

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

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

rewrite216.0ms (1.3%)

Memory

33.7MiB live, 268.0MiB allocated

Rules

7 066×	`lower-*.f32`
7 012×	`lower-*.f64`
4 130×	`lower-/.f32`
4 100×	`lower-/.f64`
2 318×	`lower--.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	81	397
0	137	380
1	476	331
2	3509	319
0	10409	316

Stop Event

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

Counts

24 → 699

Calls

Call 1

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

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

eval259.0ms (1.5%)

Memory: -14.2MiB live, 374.1MiB allocated
Compiler: Compiled 67 144 to 2 598 computations (96.1% saved)

prune387.0ms (2.3%)

Memory

-6.1MiB live, 602.2MiB allocated

Pruning

45 alts after pruning (44 fresh and 1 done)

	Pruned	Kept	Total
New	1 919	37	1 956
Fresh	20	7	27
Picked	4	1	5
Done	0	0	0
Total	1 943	45	1 988

Accuracy

93.7%

Counts

1 988 → 45

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	12.2%	(fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h))))
	29.5%	(/.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (.f64 l h)))
	29.9%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	28.9%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	70.2%	(.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	48.4%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	72.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (.f64 (/.f64 #s(literal 1/2 binary64) d) (.f64 (*.f64 M D) h)))))
	47.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
	43.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	47.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
▶	74.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
	61.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 (/.f64 D d) (/.f64 D d)))))
	35.1%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	73.9%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
	13.2%	#s(approx (+ (* (* (sqrt (/ (* d d) (* h l))) (/ h l)) (* -1/2 (/ (* (* D D) (* (* M M) 1/4)) (* d d)))) (sqrt (/ (* d d) (* h l)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d))
	23.3%	#s(approx (+ (* (* (sqrt (/ (* d d) (* h l))) (/ h l)) (* -1/2 (/ (* (* D D) (* (* M M) 1/4)) (* d d)))) (sqrt (/ (* d d) (* h l)))) (.f64 (neg.f64 d) (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M (/.f64 M (.f64 d d))) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))))
	31.3%	#s(approx (+ (* (* (sqrt (/ (* d d) (* h l))) (/ h l)) (* -1/2 (/ (* (* D D) (* (* M M) 1/4)) (* d d)))) (sqrt (/ (* d d) (* h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	18.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (.f64 D D)) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)))
	30.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (sqrt.f64 (.f64 l h)) #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 M M) D) (/.f64 D d)) (.f64 (.f64 d (sqrt.f64 (/.f64 l h))) l)) (.f64 l l)))
	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) M) (.f64 M (.f64 (sqrt.f64 (.f64 l h)) (/.f64 (.f64 D D) d))) (.f64 (.f64 d (sqrt.f64 (/.f64 l h))) l)) (.f64 l l)))
	28.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (fma.f64 (.f64 (sqrt.f64 (.f64 l h)) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (/.f64 (.f64 D D) d) (.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) l) l))
	23.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 d (sqrt.f64 l)) (sqrt.f64 h)))
	23.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 d (sqrt.f64 h)) (sqrt.f64 l)))
	43.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))))
	22.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 h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
▶	17.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
	19.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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
	21.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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (.f64 (neg.f64 h) (/.f64 l d)))))
	11.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (.f64 l h))))) (*.f64 l l)))
	9.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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (.f64 (sqrt.f64 (.f64 (.f64 l l) (/.f64 l h))) d)) (.f64 l l)))
	10.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (.f64 (neg.f64 d) (sqrt.f64 (.f64 (.f64 l l) (/.f64 l h))))) (.f64 l l)))
▶	22.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 (sqrt.f64 (*.f64 l h))))
	22.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
	31.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))))
	2.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 (neg.f64 h))) d))
	22.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.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 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l)))))
	24.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)) d))
	43.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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	20.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)) (/.f64 #s(literal 1 binary64) (.f64 l h))))) d))
	22.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))
	30.0%	#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 (.f64 l h)) d)))
	42.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
	17.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (exp.f64 (log.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))

Compiler

Compiled 2 342 to 1 496 computations (36.1% saved)

simplify143.0ms (0.8%)

Memory

17.2MiB live, 172.1MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

8 514×	`lower-*.f32`
8 468×	`lower-*.f64`
3 228×	`lower-/.f32`
3 202×	`lower-/.f64`
1 638×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	74	542
0	120	533
1	231	503
2	720	497
3	4443	493
4	7971	493
0	8044	487

Stop Event

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

Calls

Call 1

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

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

localize212.0ms (1.2%)

Memory

5.2MiB live, 290.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	6.686360932111579	(.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M))
accuracy	8.146201132132811	(/.f64 (.f64 h d) (.f64 l (sqrt.f64 (*.f64 l h))))
accuracy	8.69343520711328	(/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (*.f64 d d))
accuracy	11.099760717711428	(sqrt.f64 (*.f64 l h))
accuracy	4.933659916914634	(/.f64 (*.f64 M M) d)
accuracy	6.005825248596734	(.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d))
accuracy	8.25470496667999	(sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))
accuracy	26.99393164464347	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l)))))
accuracy	0.0546875	(*.f64 (/.f64 d h) d)
accuracy	1.1867395985447748	(/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))
accuracy	11.385975424120575	(sqrt.f64 (*.f64 (/.f64 d h) d))
accuracy	13.39161409007154	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
accuracy	0	(*.f64 l h)
accuracy	0.08203125	(/.f64 d (sqrt.f64 (*.f64 l h)))
accuracy	11.099760717711428	(sqrt.f64 (*.f64 l h))
accuracy	13.39161409007154	#s(approx (* (* (pow (/ d h) (/ 1 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.14244296690535	(.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)
accuracy	3.894104873674927	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
accuracy	7.453591561187958	(sqrt.f64 (/.f64 d l))
accuracy	7.634322978543864	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

92.0ms	142×	0	invalid
58.0ms	114×	0	valid

Compiler

Compiled 533 to 70 computations (86.9% saved)

Precisions

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

ival-mult: 48.0ms (40.1% of total)

ival-div: 45.0ms (37.6% of total)

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

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

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

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

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

exact: 1.0ms (0.8% of total)

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

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

series189.0ms (1.1%)

Memory

33.2MiB live, 286.6MiB allocated

Counts

26 → 924

Calls

Call 1

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

Outputs
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) 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 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) 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 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) 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 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) 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 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 h))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 h))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 h))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 h))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor 0 M) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor 0 M) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor 0 M) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor 0 M) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor inf M) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor inf M) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor inf M) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor inf M) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor -inf M) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor -inf M) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor -inf M) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor -inf M) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) 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))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) 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))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) 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))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) #s(literal 1/8 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) #s(literal 1/8 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) #s(literal 1/8 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) #s(literal 1/8 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow D 2)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) #s(literal 1/4 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow D 2)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) #s(literal 1/4 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow D 2)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) #s(literal 1/4 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow D 2)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) #s(literal 1/4 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/4 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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/8 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/8 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/8 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/8 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow D 2)) (taylor inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/4 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow D 2)) (taylor inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/4 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow D 2)) (taylor inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/4 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow D 2)) (taylor inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/4 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/4 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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/8 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/8 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/8 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (pow D 2)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/8 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* (pow D 2) (pow M 2))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow D 2)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/4 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow D 2)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/4 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow D 2)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/4 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow D 2)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) #s(literal 1/4 binary64)) (patch (.f64 (.f64 D D) #s(literal 1/4 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))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor 0 d) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor 0 d) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor 0 d) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor 0 d) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.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 (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor inf d) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor inf d) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor inf d) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor inf d) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<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/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 h)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 h)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 h)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 h)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor -inf d) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor -inf d) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor -inf d) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow M 2) d) (taylor -inf d) (#s(alt (/.f64 (.f64 M M) d) (patch (/.f64 (.f64 M M) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor -inf d) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor -inf d) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor -inf d) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h (pow l 3)))) (taylor -inf d) (#s(alt (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) (patch (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
31.0ms	M	@	0	((pow (/ d h) (/ 1 2)) (/ (* (* (/ 1/2 d) D) M) (/ 1 h)) (/ 1 2) (- 1 (* (/ (* (* 1/2 (* D 1/2)) (/ M d)) l) (/ (* (* (/ 1/2 d) D) M) (/ 1 h)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* (/ d h) d)) (sqrt l)) (sqrt (* (/ d h) d)) (* (/ d h) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* (* D D) 1/8) (/ (* M M) d)) (sqrt (/ h (* (* l l) l)))) (* (* (* D D) 1/8) (/ (* M M) d)) (* (* D D) 1/8) (+ (* (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* -1/2 (/ (* h d) (* l (sqrt (* l h)))))) (/ d (sqrt (* l h)))) (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* (* (* D D) 1/4) (* M M)) (* (* D D) 1/4) (sqrt (/ d l)) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (/ (* (* 1/2 (* D 1/2)) (/ M d)) l) (/ (* (* (/ 1/2 d) D) M) (/ 1 h))))) (* (* (/ 1/2 d) D) M) (sqrt (/ h (* (* l l) l))) (/ (* M M) d) (/ (* h d) (* l (sqrt (* l h)))))
26.0ms	l	@	-inf	((pow (/ d h) (/ 1 2)) (/ (* (* (/ 1/2 d) D) M) (/ 1 h)) (/ 1 2) (- 1 (* (/ (* (* 1/2 (* D 1/2)) (/ M d)) l) (/ (* (* (/ 1/2 d) D) M) (/ 1 h)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* (/ d h) d)) (sqrt l)) (sqrt (* (/ d h) d)) (* (/ d h) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* (* D D) 1/8) (/ (* M M) d)) (sqrt (/ h (* (* l l) l)))) (* (* (* D D) 1/8) (/ (* M M) d)) (* (* D D) 1/8) (+ (* (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* -1/2 (/ (* h d) (* l (sqrt (* l h)))))) (/ d (sqrt (* l h)))) (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* (* (* D D) 1/4) (* M M)) (* (* D D) 1/4) (sqrt (/ d l)) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (/ (* (* 1/2 (* D 1/2)) (/ M d)) l) (/ (* (* (/ 1/2 d) D) M) (/ 1 h))))) (* (* (/ 1/2 d) D) M) (sqrt (/ h (* (* l l) l))) (/ (* M M) d) (/ (* h d) (* l (sqrt (* l h)))))
9.0ms	d	@	inf	((pow (/ d h) (/ 1 2)) (/ (* (* (/ 1/2 d) D) M) (/ 1 h)) (/ 1 2) (- 1 (* (/ (* (* 1/2 (* D 1/2)) (/ M d)) l) (/ (* (* (/ 1/2 d) D) M) (/ 1 h)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* (/ d h) d)) (sqrt l)) (sqrt (* (/ d h) d)) (* (/ d h) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* (* D D) 1/8) (/ (* M M) d)) (sqrt (/ h (* (* l l) l)))) (* (* (* D D) 1/8) (/ (* M M) d)) (* (* D D) 1/8) (+ (* (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* -1/2 (/ (* h d) (* l (sqrt (* l h)))))) (/ d (sqrt (* l h)))) (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* (* (* D D) 1/4) (* M M)) (* (* D D) 1/4) (sqrt (/ d l)) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (/ (* (* 1/2 (* D 1/2)) (/ M d)) l) (/ (* (* (/ 1/2 d) D) M) (/ 1 h))))) (* (* (/ 1/2 d) D) M) (sqrt (/ h (* (* l l) l))) (/ (* M M) d) (/ (* h d) (* l (sqrt (* l h)))))
8.0ms	h	@	inf	((pow (/ d h) (/ 1 2)) (/ (* (* (/ 1/2 d) D) M) (/ 1 h)) (/ 1 2) (- 1 (* (/ (* (* 1/2 (* D 1/2)) (/ M d)) l) (/ (* (* (/ 1/2 d) D) M) (/ 1 h)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* (/ d h) d)) (sqrt l)) (sqrt (* (/ d h) d)) (* (/ d h) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* (* D D) 1/8) (/ (* M M) d)) (sqrt (/ h (* (* l l) l)))) (* (* (* D D) 1/8) (/ (* M M) d)) (* (* D D) 1/8) (+ (* (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* -1/2 (/ (* h d) (* l (sqrt (* l h)))))) (/ d (sqrt (* l h)))) (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* (* (* D D) 1/4) (* M M)) (* (* D D) 1/4) (sqrt (/ d l)) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (/ (* (* 1/2 (* D 1/2)) (/ M d)) l) (/ (* (* (/ 1/2 d) D) M) (/ 1 h))))) (* (* (/ 1/2 d) D) M) (sqrt (/ h (* (* l l) l))) (/ (* M M) d) (/ (* h d) (* l (sqrt (* l h)))))
8.0ms	h	@	-inf	((pow (/ d h) (/ 1 2)) (/ (* (* (/ 1/2 d) D) M) (/ 1 h)) (/ 1 2) (- 1 (* (/ (* (* 1/2 (* D 1/2)) (/ M d)) l) (/ (* (* (/ 1/2 d) D) M) (/ 1 h)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* (/ d h) d)) (sqrt l)) (sqrt (* (/ d h) d)) (* (/ d h) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* (* D D) 1/8) (/ (* M M) d)) (sqrt (/ h (* (* l l) l)))) (* (* (* D D) 1/8) (/ (* M M) d)) (* (* D D) 1/8) (+ (* (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* -1/2 (/ (* h d) (* l (sqrt (* l h)))))) (/ d (sqrt (* l h)))) (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* (* (* D D) 1/4) (* M M)) (* (* D D) 1/4) (sqrt (/ d l)) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (/ (* (* 1/2 (* D 1/2)) (/ M d)) l) (/ (* (* (/ 1/2 d) D) M) (/ 1 h))))) (* (* (/ 1/2 d) D) M) (sqrt (/ h (* (* l l) l))) (/ (* M M) d) (/ (* h d) (* l (sqrt (* l h)))))

simplify204.0ms (1.2%)

Memory

-13.8MiB live, 255.1MiB allocated

Algorithm

1×	egg-herbie

Rules

6 814×	`lower-*.f64`
6 814×	`lower-*.f32`
3 242×	`lower-/.f32`
3 242×	`lower-/.f64`
3 052×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	182	13547
1	523	13243
2	1850	13171
3	4341	13117
0	8092	12871

Stop Event

1×	iter limit
1×	node limit

Counts

924 → 924

Calls

Call 1

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

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

rewrite336.0ms (2%)

Memory

-8.6MiB live, 292.4MiB allocated

Rules

4 066×	`lower-*.f32`
4 020×	`lower-*.f64`
3 896×	`lower-/.f32`
3 870×	`lower-/.f64`
2 346×	`lower-pow.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	74	365
0	120	345
1	397	323
2	2953	301
0	8148	296

Stop Event

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

Counts

26 → 838

Calls

Call 1

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

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

eval233.0ms (1.4%)

Memory: 25.8MiB live, 319.5MiB allocated
Compiler: Compiled 59 540 to 2 957 computations (95% saved)

prune541.0ms (3.1%)

Memory

-40.6MiB live, 744.0MiB allocated

Pruning

50 alts after pruning (45 fresh and 5 done)

	Pruned	Kept	Total
New	1 992	16	2 008
Fresh	10	29	39
Picked	1	4	5
Done	0	1	1
Total	2 003	50	2 053

Accuracy

94.4%

Counts

2 053 → 50

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	12.2%	(fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h))))
	17.5%	(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D D)) d) (.f64 (.f64 (/.f64 M d) M) (/.f64 (.f64 (.f64 h d) #s(literal -1/2 binary64)) (.f64 (sqrt.f64 (.f64 l h)) l))) (/.f64 d (sqrt.f64 (*.f64 l h))))
	19.0%	(fma.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 D D)) M) (/.f64 M d)) (/.f64 (/.f64 (.f64 (.f64 h d) #s(literal -1/2 binary64)) (.f64 (sqrt.f64 (.f64 l h)) l)) d) (/.f64 d (sqrt.f64 (*.f64 l h))))
	29.5%	(/.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (.f64 l h)))
	29.9%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	28.9%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
▶	70.2%	(.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	48.4%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	47.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
	43.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	67.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (.f64 M h) #s(literal 1 binary64)))
	35.1%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	73.9%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
▶	74.0%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
	18.3%	#s(approx (+ (* (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* -1/2 (/ (* h d) (* l (sqrt (* l h)))))) (/ d (sqrt (* l h)))) (fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)))
	13.2%	#s(approx (+ (* (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* -1/2 (/ (* h d) (* l (sqrt (* l h)))))) (/ d (sqrt (* l h)))) (/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d))
	31.3%	#s(approx (+ (* (* (sqrt (/ (* d d) (* h l))) (/ h l)) (* -1/2 (/ (* (* D D) (* (* M M) 1/4)) (* d d)))) (sqrt (/ (* d d) (* h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	30.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (sqrt.f64 (.f64 l h)) #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 M M) D) (/.f64 D d)) (.f64 (.f64 d (sqrt.f64 (/.f64 l h))) l)) (.f64 l l)))
	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) M) (.f64 M (.f64 (sqrt.f64 (.f64 l h)) (/.f64 (.f64 D D) d))) (.f64 (.f64 d (sqrt.f64 (/.f64 l h))) l)) (.f64 l l)))
	28.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (fma.f64 (.f64 (sqrt.f64 (.f64 l h)) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (/.f64 (.f64 D D) d) (.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) l) l))
	23.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 d (sqrt.f64 l)) (sqrt.f64 h)))
	23.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 d (sqrt.f64 h)) (sqrt.f64 l)))
	43.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))))
	22.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 h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
✓	17.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
	19.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 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
	21.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 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (.f64 (neg.f64 h) (/.f64 l d)))))
	11.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (.f64 l h))))) (*.f64 l l)))
	9.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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (.f64 (sqrt.f64 (.f64 (.f64 l l) (/.f64 l h))) d)) (.f64 l l)))
	10.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (.f64 (neg.f64 d) (sqrt.f64 (.f64 (.f64 l l) (/.f64 l h))))) (.f64 l l)))
	4.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (sqrt (* (/ d h) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) (sqrt.f64 l)))
	22.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (pow.f64 (pow.f64 (*.f64 l h) #s(literal 1/4 binary64)) #s(literal 2 binary64))))
	23.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓	22.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 (sqrt.f64 (*.f64 l h))))
	20.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 l h) (*.f64 l h))))))
	22.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
▶	31.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))))
▶	20.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l)))))
	2.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 (neg.f64 h))) d))
	22.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	19.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 (/.f64 M d) M) D) (.f64 #s(literal 1/8 binary64) D)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l)))))
	16.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (.f64 (sqrt.f64 (neg.f64 h)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 l) (.f64 l l)))))))
✓	17.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l)))))
	18.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (.f64 (.f64 (/.f64 M d) M) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))))
	43.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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	22.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))
	24.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 l h))))
	30.0%	#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 (.f64 l h)) d)))
▶	42.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))

Compiler

Compiled 2 402 to 1 535 computations (36.1% saved)

simplify101.0ms (0.6%)

Memory

42.3MiB live, 148.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64))
cost-diff	0	(.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
cost-diff	0	(.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
cost-diff	128	(neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d)))
cost-diff	0	(.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M)
cost-diff	0	(/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d)
cost-diff	0	(.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))
cost-diff	0	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l)))))
cost-diff	0	(sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))
cost-diff	0	(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))
cost-diff	0	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))))
cost-diff	384	(/.f64 l (*.f64 d (/.f64 d h)))
cost-diff	0	(sqrt.f64 (*.f64 l h))
cost-diff	0	(/.f64 d (sqrt.f64 (*.f64 l h)))
cost-diff	0	(fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))
cost-diff	0	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
cost-diff	128	(-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))
cost-diff	320	(.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64)))
cost-diff	384	(/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l)
cost-diff	1088	(/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))

Rules

9 268×	`lower-*.f32`
9 218×	`lower-*.f64`
1 850×	`distribute-rgt-neg-in`
1 814×	`distribute-lft-neg-in`
1 632×	`associate-l`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	75	607
0	123	613
1	246	564
2	780	564
3	5255	564
0	8083	561

Stop Event

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

Calls

Call 1

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

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

localize268.0ms (1.6%)

Memory

-24.6MiB live, 372.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	4.885724749882744	(.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))
accuracy	8.861643080531147	(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (*.f64 l d))
accuracy	13.17521895954578	(sqrt.f64 (/.f64 d h))
accuracy	15.296896683108013	(sqrt.f64 (/.f64 d l))
accuracy	8.551932247127047	(.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))
accuracy	8.985898770599889	(.f64 (.f64 #s(literal 1/8 binary64) (*.f64 D D)) M)
accuracy	22.025257452978522	(sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))
accuracy	44.233567467349026	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l)))))
accuracy	0.33347437770083044	(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))
accuracy	5.636909906402017	(/.f64 l (*.f64 d (/.f64 d h)))
accuracy	19.641159849899584	(sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))
accuracy	30.44523154937471	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h))))))
accuracy	0	(fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))
accuracy	0.21484375	(/.f64 d (sqrt.f64 (*.f64 l h)))
accuracy	18.709061270011464	(sqrt.f64 (*.f64 l h))
accuracy	30.44523154937471	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
accuracy	5.461722243270007	(/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))
accuracy	6.577116361978389	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
accuracy	13.17521895954578	(sqrt.f64 (/.f64 d h))
accuracy	15.296896683108013	(sqrt.f64 (/.f64 d l))

Samples

205.0ms

256×

valid

Compiler

Compiled 590 to 73 computations (87.6% saved)

Precisions

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

ival-div: 95.0ms (56.2% of total)

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

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

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

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

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

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

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

exact: 1.0ms (0.6% of total)

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

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

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

series202.0ms (1.2%)

Memory

2.5MiB live, 245.0MiB allocated

Counts

27 → 1 140

Calls

Call 1

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

Outputs
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 h) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 h) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 h) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 h) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf h) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf h) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf h) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf h) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf h) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf h) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf h) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf h) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 l) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 l) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 l) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 l) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf l) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf l) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf l) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf l) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf l) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf l) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf l) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf l) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) d) (sqrt (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (patch (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) 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 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) 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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) (pow M 2))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) (patch (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (pow D 2) M)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 d) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 d) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 d) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor 0 d) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (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)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf d) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf d) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf d) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor inf d) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 d) (sqrt (* h l))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf d) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf d) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf d) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) (pow d 2)) (taylor -inf d) (#s(alt (/.f64 l (.f64 d (/.f64 d h))) (patch (/.f64 l (.f64 d (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (*.f64 d (/.f64 d h)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ 1 d) (sqrt (* h l)))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) (patch (sqrt.f64 (/.f64 l (.f64 d (/.f64 d h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (patch (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (patch (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (patch (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #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 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (patch (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) (patch (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (patch (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #<representation binary64>) () ())) ())

Calls

15 calls:

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

simplify249.0ms (1.5%)

Memory

18.5MiB live, 249.2MiB allocated

Algorithm

1×	egg-herbie

Rules

7 780×	`lower-*.f64`
7 780×	`lower-*.f32`
3 254×	`lower-fma.f64`
3 254×	`lower-fma.f32`
2 968×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	267	17169
1	761	16587
2	2642	16496
3	6395	16424
0	8362	16082

Stop Event

1×	iter limit
1×	node limit

Counts

1 140 → 1 140

Calls

Call 1

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

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

rewrite251.0ms (1.5%)

Memory

12.8MiB live, 338.1MiB allocated

Rules

5 618×	`lower-*.f32`
5 568×	`lower-*.f64`
3 160×	`lower-/.f32`
3 134×	`lower-/.f64`
1 812×	`lower-pow.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	75	423
0	123	403
1	407	366
2	2859	341
0	8361	333

Stop Event

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

Counts

27 → 1 101

Calls

Call 1

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

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

eval504.0ms (2.9%)

Memory: 24.9MiB live, 680.1MiB allocated
Compiler: Compiled 65 683 to 3 391 computations (94.8% saved)

prune614.0ms (3.6%)

Memory

-31.1MiB live, 752.2MiB allocated

Pruning

57 alts after pruning (51 fresh and 6 done)

	Pruned	Kept	Total
New	2 327	21	2 348
Fresh	10	30	40
Picked	4	1	5
Done	0	5	5
Total	2 341	57	2 398

Accuracy

94.4%

Counts

2 398 → 57

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	12.2%	(fma.f64 (/.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/4 binary64)) (.f64 M M)) (.f64 d d)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 h d) (.f64 l (sqrt.f64 (.f64 l h))))) (/.f64 d (sqrt.f64 (.f64 l h))))
	17.5%	(fma.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D D)) d) (.f64 (.f64 (/.f64 M d) M) (/.f64 (.f64 (.f64 h d) #s(literal -1/2 binary64)) (.f64 (sqrt.f64 (.f64 l h)) l))) (/.f64 d (sqrt.f64 (*.f64 l h))))
	19.0%	(fma.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 D D)) M) (/.f64 M d)) (/.f64 (/.f64 (.f64 (.f64 h d) #s(literal -1/2 binary64)) (.f64 (sqrt.f64 (.f64 l h)) l)) d) (/.f64 d (sqrt.f64 (*.f64 l h))))
	29.5%	(/.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (.f64 l h)))
	29.9%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	28.6%	(.f64 (fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) (.f64 l d)) (.f64 D (/.f64 #s(literal 1/2 binary64) d))) (.f64 M h) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
	28.9%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	68.5%	(.f64 (.f64 (fma.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) (.f64 l d)) (.f64 (.f64 M h) (.f64 D (/.f64 #s(literal 1/2 binary64) d))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	73.8%	(.f64 (.f64 (fma.f64 (.f64 (/.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) d) (.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	45.3%	(.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))
	73.8%	(.f64 (.f64 (fma.f64 (.f64 (neg.f64 (.f64 (/.f64 #s(literal 1/4 binary64) l) (/.f64 (.f64 M D) d))) (.f64 M (*.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	69.5%	(.f64 (.f64 (fma.f64 (.f64 h (/.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) M) (.f64 l d))) (.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	48.4%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	58.1%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 h l) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 M D) #s(literal 1/2 binary64)) (.f64 (.f64 M D) #s(literal 1/2 binary64))) (*.f64 d d))) #s(literal 1 binary64)))
	72.4%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal 1/4 binary64) D) l) M) d) (/.f64 (.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))))
	72.1%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (.f64 (/.f64 #s(literal 1/2 binary64) d) (.f64 (*.f64 M D) h)))))
	8.3%	(.f64 #s(approx ( (+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1) (sqrt (/ d h))) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) l) (sqrt.f64 (/.f64 h (.f64 (*.f64 d d) d)))))) (sqrt.f64 (/.f64 d l)))
	13.5%	(.f64 #s(approx ( (+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1) (sqrt (/ d h))) (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (.f64 (.f64 d d) d)))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) l)))) (sqrt.f64 (/.f64 d l)))
	43.2%	(.f64 #s(approx ( (+ (* (* (neg (/ (* (* 1/4 D) M) (* l d))) (* M (* D (/ 1/2 d)))) h) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	18.3%	#s(approx (+ (* (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* -1/2 (/ (* h d) (* l (sqrt (* l h)))))) (/ d (sqrt (* l h)))) (fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)))
	13.2%	#s(approx (+ (* (/ (* (* (* D D) 1/4) (* M M)) (* d d)) (* -1/2 (/ (* h d) (* l (sqrt (* l h)))))) (/ d (sqrt (* l h)))) (/.f64 (fma.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (.f64 M M)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (*.f64 d d))) d))
	31.3%	#s(approx (+ (* (* (sqrt (/ (* d d) (* h l))) (/ h l)) (* -1/2 (/ (* (* D D) (* (* M M) 1/4)) (* d d)))) (sqrt (/ (* d d) (* h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	30.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (sqrt.f64 (.f64 l h)) #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 M M) D) (/.f64 D d)) (.f64 (.f64 d (sqrt.f64 (/.f64 l h))) l)) (.f64 l l)))
	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) M) (.f64 M (.f64 (sqrt.f64 (.f64 l h)) (/.f64 (.f64 D D) d))) (.f64 (.f64 d (sqrt.f64 (/.f64 l h))) l)) (.f64 l l)))
	28.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (fma.f64 (.f64 (sqrt.f64 (.f64 l h)) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (/.f64 (.f64 D D) d) (.f64 (*.f64 d (sqrt.f64 (/.f64 l h))) l)) l) l))
	2.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l))))
	23.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 d (sqrt.f64 l)) (sqrt.f64 h)))
	23.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 d (sqrt.f64 h)) (sqrt.f64 l)))
	43.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))))
	22.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 h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
✓	17.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
	11.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (.f64 l h))))) (*.f64 l l)))
	9.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 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (.f64 (sqrt.f64 (.f64 (.f64 l l) (/.f64 l h))) d)) (.f64 l l)))
	10.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* -1/8 (* M M)) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (* (/ l h) (* l l))) d)) (.f64 (neg.f64 d) (sqrt.f64 (.f64 (.f64 l l) (/.f64 l h))))) (.f64 l l)))
	4.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (sqrt (* (/ d h) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)))) (sqrt.f64 l)))
	23.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓	22.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 (sqrt.f64 (*.f64 l h))))
	20.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 l h) (*.f64 l h))))))
	22.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
	22.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 d (sqrt.f64 (*.f64 l h))))))
	22.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 l h)) (/.f64 #s(literal 1 binary64) d))))
	26.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (/.f64 l (.f64 d d)) h))))
	31.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (/ l (* d (/ d h)))) (/.f64 (sqrt.f64 (*.f64 l h)) (neg.f64 d)))))
	22.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 (.f64 (.f64 M (.f64 #s(literal 1/8 binary64) D)) D) M) d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l)))))
	19.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (.f64 (sqrt.f64 (neg.f64 h)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 l) (.f64 l l)))))))
	2.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) l))) (sqrt.f64 (neg.f64 h))) d))
	22.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	19.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 (/.f64 M d) M) D) (.f64 #s(literal 1/8 binary64) D)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l)))))
	16.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (.f64 (sqrt.f64 (neg.f64 h)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 l) (.f64 l l)))))))
✓	17.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l)))))
	20.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) M) (.f64 (/.f64 M d) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))))
	18.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (.f64 (.f64 (/.f64 M d) M) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 h (.f64 (*.f64 l l) l))))))
✓	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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	24.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 l h))))
	30.0%	#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 (.f64 l h)) d)))
	27.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 h))) (sqrt.f64 (neg.f64 l)))))
✓	42.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))

Compiler

Compiled 4 058 to 1 366 computations (66.3% saved)

regimes277.0ms (1.6%)

Memory

-1.7MiB live, 348.6MiB allocated

Counts

107 → 2

Calls

Call 1

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

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

Calls

7 calls:

66.0ms	h
46.0ms	M
39.0ms	l
31.0ms	D
30.0ms	d

Results

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

Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes129.0ms (0.8%)

Memory

-17.1MiB live, 69.6MiB allocated

Counts

94 → 3

Calls

Call 1

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

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

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

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

Calls

3 calls:

45.0ms	h
25.0ms	l
25.0ms	d

Results

Accuracy	Segments	Branch
82.3%	3	`d`
81.5%	3	`l`
79.9%	2	`h`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes65.0ms (0.4%)

Memory

36.5MiB live, 72.7MiB allocated

Counts

92 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

38.0ms

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

Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes69.0ms (0.4%)

Memory

-24.6MiB live, 50.4MiB allocated

Counts

79 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

19.0ms

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

Results

Accuracy	Segments	Branch
80.3%	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 40 to 22 computations (45% saved)

regimes29.0ms (0.2%)

Memory

-10.1MiB live, 38.0MiB allocated

Counts

71 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

17.0ms

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

Results

Accuracy	Segments	Branch
80.3%	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 40 to 22 computations (45% saved)

regimes87.0ms (0.5%)

Memory

2.7MiB live, 41.4MiB allocated

Counts

68 → 4

Calls

Call 1

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes19.0ms (0.1%)

Memory

21.0MiB live, 21.0MiB allocated

Counts

63 → 4

Calls

Call 1

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

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

Calls

1 calls:

15.0ms

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

Results

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

Compiler

Compiled 40 to 22 computations (45% saved)

regimes221.0ms (1.3%)

Memory

13.9MiB live, 205.8MiB allocated

Counts

61 → 4

Calls

Call 1

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

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

Calls

7 calls:

50.0ms	h
37.0ms	(*.f64 M D)
33.0ms	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
32.0ms	M
32.0ms	l

Results

Accuracy	Segments	Branch
61.7%	5	`h`
65.6%	4	`d`
66.7%	4	`l`
55.7%	3	`D`
59.2%	2	`M`
59.1%	2	`(*.f64 M D)`
71.4%	4	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes40.0ms (0.2%)

Memory

-0.5MiB live, 37.9MiB allocated

Counts

60 → 4

Calls

Call 1

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

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

Calls

1 calls:

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

Compiler

Compiled 40 to 22 computations (45% saved)

regimes35.0ms (0.2%)

Memory

-15.0MiB live, 26.3MiB allocated

Counts

39 → 4

Calls

Call 1

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

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

Calls

1 calls:

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

Compiler

Compiled 40 to 22 computations (45% saved)

regimes29.0ms (0.2%)

Memory

10.8MiB live, 48.2MiB allocated

Counts

38 → 4

Calls

Call 1

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

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

Calls

2 calls:

16.0ms

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

Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes44.0ms (0.3%)

Memory

-7.3MiB live, 67.5MiB allocated

Counts

35 → 4

Calls

Call 1

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

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

Calls

2 calls:

30.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

Results

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

Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes41.0ms (0.2%)

Memory

15.1MiB live, 59.6MiB allocated

Counts

34 → 4

Calls

Call 1

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

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

Calls

3 calls:

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

10.0ms

9.0ms

(*.f64 M D)

Results

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

Compiler

Compiled 54 to 33 computations (38.9% saved)

regimes32.0ms (0.2%)

Memory

-3.1MiB live, 70.8MiB allocated

Counts

33 → 4

Calls

Call 1

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

Calls

2 calls:

18.0ms

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

11.0ms

Results

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

Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes52.0ms (0.3%)

Memory

6.5MiB live, 124.8MiB allocated

Counts

18 → 4

Calls

Call 1

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

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

Calls

7 calls:

12.0ms	D
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))))
6.0ms	M
6.0ms	d
6.0ms	l

Results

Accuracy	Segments	Branch
45.4%	2	`(*.f64 M D)`
44.3%	2	`M`
48.4%	2	`h`
46.5%	2	`D`
48.8%	2	`d`
53.1%	4	`l`
49.8%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes12.0ms (0.1%)

Memory

-4.8MiB live, 34.6MiB allocated

Counts

16 → 2

Calls

Call 1

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

Outputs

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

Calls

2 calls:

6.0ms

5.0ms

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

Results

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

Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes5.0ms (0%)

Memory

13.7MiB live, 13.7MiB allocated

Counts

11 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

4.0ms

Results

Accuracy	Segments	Branch
49.3%	2	`l`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes15.0ms (0.1%)

Memory

-33.0MiB live, 47.6MiB allocated

Counts

8 → 2

Calls

Call 1

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes5.0ms (0%)

Memory

15.8MiB live, 15.8MiB allocated

Counts

4 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

2.0ms

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

2.0ms

Results

Accuracy	Segments	Branch
43.8%	2	`D`
45.6%	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 46 to 27 computations (41.3% saved)

regimes10.0ms (0.1%)

Memory

-5.0MiB live, 34.6MiB allocated

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 78 to 53 computations (32.1% saved)

bsearch50.0ms (0.3%)

Memory

17.2MiB live, 136.7MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
45.0ms	-6.568449087632475e-306	1.5833803769191225e-307

Samples

22.0ms	128×	0	valid
15.0ms	108×	0	invalid

Compiler

Compiled 731 to 470 computations (35.7% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch135.0ms (0.8%)

Memory

-28.4MiB live, 207.8MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
56.0ms	3.694620627427894e-210	8.743610429348517e-210
68.0ms	-2.1799317240314692e-301	3.5381167621334946e-305

Samples

70.0ms	240×	0	valid
35.0ms	302×	0	invalid

Compiler

Compiled 1 213 to 800 computations (34% saved)

Precisions

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

ival-div: 50.0ms (57.3% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch3.0ms (0%)

Memory

-36.1MiB live, 2.6MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.4963065580513473e+264	+inf

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

2.1MiB live, 2.1MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.4963065580513473e+264	+inf

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

1.9MiB live, 1.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.4963065580513473e+264	+inf

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

2.0MiB live, 2.0MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.4963065580513473e+264	+inf
0.0ms	0.0	1.0338981218499855e-269
0.0ms	-1.5126099688046325e-167	0.0

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.4963065580513473e+264	+inf
0.0ms	0.0	1.0338981218499855e-269
0.0ms	-1.5126099688046325e-167	0.0

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.4963065580513473e+264	+inf
0.0ms	0.0	1.0338981218499855e-269
0.0ms	-1.4634259358752783e+93	-1.8824391148628693e+42

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

1.9MiB live, 1.9MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.4963065580513473e+264	+inf
0.0ms	0.0	1.0338981218499855e-269
0.0ms	-1.8824391148628693e+42	-1.244043487020007e-29

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

1.5MiB live, 1.6MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.4963065580513473e+264	+inf
0.0ms	0.0	1.0338981218499855e-269
0.0ms	-1.8824391148628693e+42	-1.244043487020007e-29

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.4963065580513473e+264	+inf
0.0ms	0.0	1.0338981218499855e-269
0.0ms	-1.8824391148628693e+42	-1.244043487020007e-29

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.4963065580513473e+264	+inf
0.0ms	0.0	1.0338981218499855e-269
0.0ms	-1.4634259358752783e+93	-1.8824391148628693e+42

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

1.5MiB live, 1.5MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.4963065580513473e+264	+inf
0.0ms	0.0	1.0338981218499855e-269
0.0ms	-1.0513534795037558e+202	-2.518877376519935e+118

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

1.5MiB live, 1.5MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.4963065580513473e+264	+inf
0.0ms	0.0	1.0338981218499855e-269
0.0ms	-1.5126099688046325e-167	0.0

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch153.0ms (0.9%)

Memory

0.5MiB live, 238.6MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
47.0ms	2.5952067977907808e-228	2.1564994524610414e-226
51.0ms	-3.700049140726975e-286	-4.042963450038112e-297
38.0ms	-3.7153925955476027e-168	-1.5634147473738235e-169

Samples

65.0ms	384×	0	valid
49.0ms	321×	0	invalid

Compiler

Compiled 817 to 561 computations (31.3% saved)

Precisions

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

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

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

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

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

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

exact: 1.0ms (1.2% of total)

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

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

bsearch1.0ms (0%)

Memory

1.9MiB live, 1.9MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.5952067977907808e-228	2.1564994524610414e-226

Compiler

Compiled 260 to 184 computations (29.2% saved)

bsearch1.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.5952067977907808e-228	2.1564994524610414e-226

Compiler

Compiled 253 to 184 computations (27.3% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-1.8824391148628693e+42	-1.244043487020007e-29

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch0.0ms (0%)

Memory

0.4MiB live, 0.4MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-1.8824391148628693e+42	-1.244043487020007e-29

Compiler

Compiled 43 to 30 computations (30.2% saved)

simplify43.0ms (0.2%)

Memory

-3.2MiB live, 74.4MiB allocated

Algorithm

1×	egg-herbie

Rules

250×	`neg-mul-1_binary64`
238×	`*-commutative_binary64`
176×	`unsub-neg_binary64`
150×	`distribute-rgt-neg-in_binary64`
148×	`distribute-lft-neg-in_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	231	3526
1	347	3526
2	443	3526
3	540	3526
4	615	3526
5	661	3526
6	840	3526
7	1100	3526
8	1110	3526

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 h #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))))
(if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 d #s(literal 962387809749089/185074578797901741880056797082722491652594329967104984657651428941017502866551504889831353286343393081484762513295539999743888383402206229143653783207080500031048652651411283677848015502881818392904162310804899782048803192832 binary64)) (/.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (.f64 l h))) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal 1/4 binary64) D) l) M) d) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (.f64 (/.f64 #s(literal 1/4 binary64) l) (/.f64 (.f64 M D) d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) (.f64 (.f64 (fma.f64 (.f64 (/.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) d) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) (.f64 (.f64 (fma.f64 (.f64 h (/.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) M) (.f64 l d))) (.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000043377296974619186073290293324951939311791773789336116812889681110941323755520 binary64)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 M (.f64 #s(literal 1/8 binary64) D)) D) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) M) (.f64 (/.f64 M d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000043377296974619186073290293324951939311791773789336116812889681110941323755520 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (.f64 (.f64 (/.f64 M d) M) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -9999999999999999017474591319641730272072128367390393282944984404433823148266910656903077218579754480674748342103902584639871831041306548820316951909258721342916786285447187693014154661313392524876840960 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 l h) (.f64 l h)))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 l #s(literal -3144336917475261/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 l #s(literal -791560241142575/184083777009901148951480851536796132722480842643692193047992403105518260024832986247893480778145316885626996612988306798242600723265962621432675768974821503362834322867062256922933472871676000378319956942935045907290266298718681990629287025193807090855270922941016369397705979841003229496151404881535205516509184 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 l h) (.f64 l h)))))) (if (<=.f64 l #s(literal 3072621050671037/853505847408621347082221029212320998034529065256436244530720999905796766440656905154743321711558949215095028555959454777073766611727278730286509574698346245900180170177793863483274020596712195165307522065393485053656415748796987045268976304128 binary64)) #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 3072621050671037/853505847408621347082221029212320998034529065256436244530720999905796766440656905154743321711558949215095028555959454777073766611727278730286509574698346245900180170177793863483274020596712195165307522065393485053656415748796987045268976304128 binary64)) #s(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) #s(approx (sqrt (/ l (* d (/ d h)))) (/.f64 (sqrt.f64 (.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 3072621050671037/853505847408621347082221029212320998034529065256436244530720999905796766440656905154743321711558949215095028555959454777073766611727278730286509574698346245900180170177793863483274020596712195165307522065393485053656415748796987045268976304128 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

Outputs
(if (<=.f64 h #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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 -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) l))) (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 d #s(literal 962387809749089/185074578797901741880056797082722491652594329967104984657651428941017502866551504889831353286343393081484762513295539999743888383402206229143653783207080500031048652651411283677848015502881818392904162310804899782048803192832 binary64)) (/.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) d) (sqrt.f64 (.f64 l h))) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))))
(if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)) (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) l))) (.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 d #s(literal 962387809749089/185074578797901741880056797082722491652594329967104984657651428941017502866551504889831353286343393081484762513295539999743888383402206229143653783207080500031048652651411283677848015502881818392904162310804899782048803192832 binary64)) (/.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 (neg.f64 l) d))) h #s(literal 1 binary64)) d) (sqrt.f64 (.f64 l h))) (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal 1/4 binary64) D) l) M) d) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 (.f64 #s(literal 1/4 binary64) D) l) M) d) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 #s(literal 1 binary64) h)))) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (.f64 (/.f64 #s(literal 1/4 binary64) l) (/.f64 (.f64 M D) d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 #s(literal 1/4 binary64) (neg.f64 l)) (/.f64 (.f64 M D) d)) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) (.f64 (.f64 (fma.f64 (.f64 (/.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) d) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) (.f64 (.f64 (fma.f64 (.f64 (/.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) l) d) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) (.f64 (.f64 (fma.f64 (.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 l d))) (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d)))) h #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) D) M) (.f64 (neg.f64 l) d))) h #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) (.f64 (.f64 (fma.f64 (.f64 h (/.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) M) (.f64 l d))) (.f64 D (/.f64 #s(literal 1/2 binary64) d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) (.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 M D)) M) (.f64 l d)) h) (.f64 (/.f64 #s(literal 1/2 binary64) d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000043377296974619186073290293324951939311791773789336116812889681110941323755520 binary64)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -1000000000000000043377296974619186073290293324951939311791773789336116812889681110941323755520 binary64)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (/.f64 (.f64 (.f64 (.f64 M M) #s(literal 1/4 binary64)) (.f64 D D)) (.f64 d d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 M (.f64 #s(literal 1/8 binary64) D)) D) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (/.f64 (.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) D) M) D) M) d))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M) M) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) M) (.f64 (/.f64 M d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l))) (/.f64 M d)) (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) M))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000043377296974619186073290293324951939311791773789336116812889681110941323755520 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (.f64 (.f64 (/.f64 M d) M) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -1000000000000000043377296974619186073290293324951939311791773789336116812889681110941323755520 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 (.f64 (/.f64 M d) M) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (.f64 D D))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -9999999999999999017474591319641730272072128367390393282944984404433823148266910656903077218579754480674748342103902584639871831041306548820316951909258721342916786285447187693014154661313392524876840960 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -9999999999999999017474591319641730272072128367390393282944984404433823148266910656903077218579754480674748342103902584639871831041306548820316951909258721342916786285447187693014154661313392524876840960 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (.f64 (.f64 l l) l)))) (.f64 #s(literal -1/8 binary64) (.f64 M M)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 l h) (.f64 l h)))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -5311379928167671/531137992816767098689588206552468627329593117727031923199444138200403559860852242739162502265229285668889329486246501015346579337652707239409519978766587351943831270835393219031728128 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 l h) (.f64 l h)))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 2000000000000000088281037805790575558572782794765162549126012346566888792166047218548967335383701664797639397755095222062794225936857411749371199466668068384943561307143740090430395479270498413381628926367543716105666065019831099205147950020333146087680957122347008 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 l #s(literal -3144336917475261/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 l #s(literal -791560241142575/184083777009901148951480851536796132722480842643692193047992403105518260024832986247893480778145316885626996612988306798242600723265962621432675768974821503362834322867062256922933472871676000378319956942935045907290266298718681990629287025193807090855270922941016369397705979841003229496151404881535205516509184 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 l h) (.f64 l h)))))) (if (<=.f64 l #s(literal 3072621050671037/853505847408621347082221029212320998034529065256436244530720999905796766440656905154743321711558949215095028555959454777073766611727278730286509574698346245900180170177793863483274020596712195165307522065393485053656415748796987045268976304128 binary64)) #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 -3144336917475261/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 l #s(literal -791560241142575/184083777009901148951480851536796132722480842643692193047992403105518260024832986247893480778145316885626996612988306798242600723265962621432675768974821503362834322867062256922933472871676000378319956942935045907290266298718681990629287025193807090855270922941016369397705979841003229496151404881535205516509184 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 l h) (.f64 l h)))))) (if (<=.f64 l #s(literal 3072621050671037/853505847408621347082221029212320998034529065256436244530720999905796766440656905154743321711558949215095028555959454777073766611727278730286509574698346245900180170177793863483274020596712195165307522065393485053656415748796987045268976304128 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 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 3072621050671037/853505847408621347082221029212320998034529065256436244530720999905796766440656905154743321711558949215095028555959454777073766611727278730286509574698346245900180170177793863483274020596712195165307522065393485053656415748796987045268976304128 binary64)) #s(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) #s(approx (sqrt (/ l (* d (/ d h)))) (/.f64 (sqrt.f64 (.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 3072621050671037/853505847408621347082221029212320998034529065256436244530720999905796766440656905154743321711558949215095028555959454777073766611727278730286509574698346245900180170177793863483274020596712195165307522065393485053656415748796987045268976304128 binary64)) #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 3072621050671037/853505847408621347082221029212320998034529065256436244530720999905796766440656905154743321711558949215095028555959454777073766611727278730286509574698346245900180170177793863483274020596712195165307522065393485053656415748796987045268976304128 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -1000000000000000044885712678075916785549312 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

soundness1.9s (11.3%)

Memory

17.5MiB live, 1 597.8MiB allocated

Rules

7 780×	`lower-*.f64`
7 780×	`lower-*.f32`
7 446×	`lower-*.f32`
7 434×	`lower-*.f64`
7 066×	`lower-*.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	75	423
0	123	403
1	407	366
2	2859	341
0	8361	333
0	74	365
0	120	345
1	397	323
2	2953	301
0	8148	296
0	22	64
0	38	60
1	124	59
2	828	59
0	8726	58
0	120	3277
1	321	3193
2	1145	3183
3	2621	3164
4	5465	3164
0	8512	3125
0	267	17169
1	761	16587
2	2642	16496
3	6395	16424
0	8362	16082
0	81	397
0	137	380
1	476	331
2	3509	319
0	10409	316

Stop Event

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

Compiler

Compiled 4 449 to 1 522 computations (65.8% saved)

preprocess263.0ms (1.5%)

Memory

1.5MiB live, 272.2MiB allocated

Remove

(abs M)

(abs D)

Compiler

Compiled 4 948 to 814 computations (83.5% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze537.0ms (3.1%)

sample5.8s (33.9%)

explain325.0ms (1.9%)

preprocess142.0ms (0.8%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify114.0ms (0.7%)

localize60.0ms (0.3%)

series69.0ms (0.4%)

simplify141.0ms (0.8%)

rewrite228.0ms (1.3%)

eval140.0ms (0.8%)

prune167.0ms (1%)

simplify126.0ms (0.7%)

localize238.0ms (1.4%)

series155.0ms (0.9%)

simplify181.0ms (1.1%)

rewrite216.0ms (1.3%)

eval259.0ms (1.5%)

prune387.0ms (2.3%)

simplify143.0ms (0.8%)

localize212.0ms (1.2%)

series189.0ms (1.1%)

simplify204.0ms (1.2%)

rewrite336.0ms (2%)

eval233.0ms (1.4%)

prune541.0ms (3.1%)

simplify101.0ms (0.6%)

localize268.0ms (1.6%)

series202.0ms (1.2%)

simplify249.0ms (1.5%)

rewrite251.0ms (1.5%)

eval504.0ms (2.9%)

prune614.0ms (3.6%)

regimes277.0ms (1.6%)

regimes129.0ms (0.8%)

regimes65.0ms (0.4%)

regimes69.0ms (0.4%)

regimes29.0ms (0.2%)

regimes87.0ms (0.5%)

regimes19.0ms (0.1%)

regimes221.0ms (1.3%)

regimes40.0ms (0.2%)

regimes35.0ms (0.2%)

regimes29.0ms (0.2%)

regimes44.0ms (0.3%)

regimes41.0ms (0.2%)

regimes32.0ms (0.2%)

regimes52.0ms (0.3%)

regimes12.0ms (0.1%)

regimes5.0ms (0%)

regimes15.0ms (0.1%)

regimes5.0ms (0%)

regimes10.0ms (0.1%)

bsearch50.0ms (0.3%)

bsearch135.0ms (0.8%)

bsearch3.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch153.0ms (0.9%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

simplify43.0ms (0.2%)

soundness1.9s (11.3%)

preprocess263.0ms (1.5%)

end0.0ms (0%)

Profiling