Metrics for Henrywood and Agarwal, Equation (12)

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze444.0ms (1.7%)

Memory

-1.6MiB live, 571.9MiB 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.7s (22.2%)

Memory

64.8MiB live, 7 330.3MiB allocated

Samples

2.3s	13 277×	0	invalid
2.3s	8 256×	0	valid

Precisions

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

ival-mult: 1.3s (36.2% of total)

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

ival-pow: 712.0ms (20.6% of total)

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

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

exact: 21.0ms (0.6% of total)

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

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

Bogosity

explain320.0ms (1.2%)

Memory

-61.4MiB live, 486.0MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
71	-	7	(-5.418924462312424e-65 -1.0612802427811944e-174 -4.431668474623581e+252 -2.29942426529896e+189 2.0065594057939783e+221)	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
67	-	1	(1.3209030222152564e-45 4.561006901412901e+277 3.9366614184802057e-287 7.5859560992543865e-196 2.2200596797522156e+127)	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
47	-	1	(5.975501920705902e-205 1.269295813122124e-54 2.0134163609606385e-196 4.96850951813796e-143 5.4244347498140384e-222)	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`
28	-	2	(2.747562673560429e-292 7.348168372659878e-159 3.991822678917535e+218 9.418098332189325e-36 -224871868.44795972)	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
21	-	0	-	`(/.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	35	0
↳	`(/.f64 d l)`	underflow	35
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	33	0
↳	`(/.f64 d h)`	overflow	33
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	33	0
↳	`(/.f64 d h)`	underflow	33
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	29	0
↳	`(/.f64 d l)`	overflow	29
`*.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**	15	0
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*uo**	12	0
↳	`(/.f64 d h)`	underflow	33
↳	`(/.f64 d l)`	underflow	35
↳	`(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))`	underflow	17
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	91
↳	`(.f64 (/.f64 #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	91
↳	`(/.f64 h l)`	overflow	30
↳	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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	27
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	45
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*no**	11	0
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 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**	8	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	91
↳	`(.f64 (/.f64 #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	91
↳	`(*.f64 M D)`	overflow	27
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	45
↳	`(/.f64 h l)`	underflow	33
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	o/n	7	0
↳	`(*.f64 M D)`	overflow	27
`*.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**	3	0
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	*uo**	2	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	underflow	66
↳	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))`	underflow	66
↳	`(*.f64 M D)`	underflow	32
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	underflow	39
↳	`(/.f64 h l)`	overflow	30
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	u/n	1	0
↳	`(*.f64 M D)`	underflow	32

Confusion

	Predicted +	Predicted -
+	99	5
-	27	125

Precision

0.7857142857142857

Recall

0.9519230769230769

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	99	0	5
-	27	0	125

Precision?

0.7857142857142857

Recall?

0.9519230769230769

Freqs

test

number	freq
0	130
1	81
2	28
3	16
4	1

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

104.0ms

512×

valid

Compiler

Compiled 352 to 70 computations (80.1% saved)

Precisions

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

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

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

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

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

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

exact: 1.0ms (1.4% of total)

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

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

preprocess205.0ms (0.8%)

Memory

34.4MiB live, 270.5MiB allocated

Algorithm

1×	egg-herbie

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Calls

Call 1

Inputs

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

Outputs

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

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

Symmetry

(abs D)

(abs M)

(sort M D)

Compiler

Compiled 40 to 22 computations (45% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

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

Compiler

Compiled 40 to 22 computations (45% saved)

simplify217.0ms (0.8%)

Memory

13.6MiB live, 204.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

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

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Calls

Call 1

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

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

localize83.0ms (0.3%)

Memory

-20.9MiB live, 139.4MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	6.591853190622748	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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	10.90964966137978	(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy	15.869029171415182	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	15.930188680082226	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

53.0ms

256×

valid

Compiler

Compiled 156 to 24 computations (84.6% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

series58.0ms (0.2%)

Memory

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

Calls

51 calls:

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

simplify235.0ms (0.9%)

Memory

20.7MiB live, 292.0MiB 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	1147	3183
3	2635	3164
4	5494	3164
0	8538	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))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))

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

rewrite360.0ms (1.4%)

Memory

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

eval179.0ms (0.7%)

Memory: 40.9MiB live, 189.5MiB allocated
Compiler: Compiled 32 235 to 2 661 computations (91.7% saved)

prune456.0ms (1.8%)

Memory

30.1MiB live, 401.5MiB allocated

Pruning

36 alts after pruning (36 fresh and 0 done)

	Pruned	Kept	Total
New	773	36	809
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	774	36	810

Accuracy

88.9%

Counts

810 → 36

Alt Table

Click to see full alt table

Status	Accuracy	Program
	21.1%	(fma.f64 (/.f64 (.f64 (.f64 M D) (.f64 M (.f64 D #s(literal 1/2 binary64)))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 (neg.f64 (/.f64 h l)) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	21.6%	(fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #s(literal 1/2 binary64)) (/.f64 (.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (neg.f64 h)) l) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	20.8%	(fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #s(literal -1/2 binary64)) (/.f64 (.f64 (/.f64 h l) (.f64 M (.f64 D (.f64 M D)))) (.f64 (.f64 d d) #s(literal 4 binary64))) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	28.5%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	29.7%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h))
▶	26.6%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	26.0%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 l))
	49.4%	(/.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 h d)))
	48.1%	(/.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 l d)))
	32.4%	(.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	56.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) d) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) d)))
▶	49.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (*.f64 d d))))
	51.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 (neg.f64 D) (.f64 M (.f64 M D))) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (neg.f64 (.f64 (*.f64 d d) #s(literal 4 binary64))))))
▶	65.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	63.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 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 h l)))))
	49.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 (.f64 (/.f64 M d) (/.f64 M d)) (.f64 (.f64 D #s(literal 1/2 binary64)) (*.f64 D #s(literal 1/2 binary64))))) (/.f64 h l))))
	57.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 h l)) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
	40.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 D D) (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (.f64 d (*.f64 d l))))))
	59.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.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 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	61.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	2.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #s(approx (pow (/ d l) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d l))))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	35.7%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	36.0%	(.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))))
	35.9%	(.f64 (.f64 (.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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	29.6%	(.f64 (.f64 (.f64 (pow.f64 d #s(literal 1/4 binary64)) (.f64 (pow.f64 h #s(literal -1/4 binary64)) (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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.0%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	17.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))) d))
	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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (*.f64 l l)))
	24.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (*.f64 l l))))))) h))
	14.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
	12.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
	26.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
	24.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 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))))))
	2.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 h (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h h))))) (neg.f64 d)))))
	13.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 (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) #s(literal -1/8 binary64))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h 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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))

Compiler

Compiled 2 730 to 1 642 computations (39.9% saved)

simplify397.0ms (1.5%)

Memory

-43.4MiB live, 228.4MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

8 360×	`lower-*.f32`
8 318×	`lower-*.f64`
2 952×	`lower-/.f32`
2 928×	`lower-/.f64`
1 778×	`distribute-lft-neg-in`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	73	717
0	121	701
1	259	679
2	896	658
3	5098	658
0	8312	646

Stop Event

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

Calls

Call 1

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

localize347.0ms (1.4%)

Memory

17.8MiB live, 337.9MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	5.943692027368887	(.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l)))
accuracy	6.860381873808082	(/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (*.f64 d d))
accuracy	7.380922896369969	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	9.355782440903885	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	1.6920404669384022	(.f64 M (.f64 D (*.f64 M D)))
accuracy	5.540305774755266	(fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))
accuracy	7.380922896369969	(sqrt.f64 (/.f64 d h))
accuracy	8.265194879266707	(/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (*.f64 d d) #s(literal 4 binary64)))
accuracy	5.540305774755266	(fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))
accuracy	7.380922896369969	(sqrt.f64 (/.f64 d h))
accuracy	8.265194879266707	(/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (*.f64 d d) #s(literal 4 binary64)))
accuracy	9.344063690903894	(sqrt.f64 (/.f64 d l))
accuracy	0.06640625	(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
accuracy	0.19920569999419097	(/.f64 #s(literal 1 binary64) (*.f64 h l))
accuracy	7.908673738417837	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
accuracy	31.19940015494215	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))
accuracy	2.896313728320978	(/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (*.f64 d #s(literal 2 binary64))) l)
accuracy	3.8958633343253815	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
accuracy	7.380922896369969	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	9.355782440903885	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

99.0ms	124×	0	invalid
94.0ms	132×	0	valid

Compiler

Compiled 751 to 67 computations (91.1% saved)

Precisions

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

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

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

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

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

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

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

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

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

exact: 1.0ms (0.7% of total)

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

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

series173.0ms (0.7%)

Memory

-12.7MiB live, 104.3MiB allocated

Counts

21 → 864

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

Outputs
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt h))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.f64 d d)) (patch (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (.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 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (patch (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor 0 M) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor 0 M) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor 0 M) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor 0 M) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor inf M) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor inf M) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor inf M) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor inf M) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor -inf M) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor -inf M) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor -inf M) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor -inf M) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor 0 D) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor 0 D) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor 0 D) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor 0 D) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor inf D) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor inf D) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor inf D) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor inf D) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor -inf D) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor -inf D) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor -inf D) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (pow M 2)) (taylor -inf D) (#s(alt (.f64 M (.f64 D (.f64 M D))) (patch (.f64 M (.f64 D (.f64 M D))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) (patch (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 h l))) #<representation binary64>) () ())) ())

Calls

216 calls:

Time	Variable		Point	Expression
33.0ms	M	@	0	(* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d)))
11.0ms	M	@	inf	(/ (/ (* M D) (* d 2)) (/ 1 h))
7.0ms	h	@	0	(/ (/ (* M D) (* d 2)) (/ 1 h))
1.0ms	d	@	0	(* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d)))
1.0ms	D	@	0	(/ (/ (* M D) (* d 2)) (/ 1 h))

simplify298.0ms (1.2%)

Memory

-7.7MiB live, 343.7MiB allocated

Algorithm

1×	egg-herbie

Rules

8 850×	`lower-*.f64`
8 850×	`lower-*.f32`
6 390×	`lower-fma.f64`
6 390×	`lower-fma.f32`
3 168×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	310	14701
1	923	14318
2	3441	14238
3	6499	14178
0	8528	13899

Stop Event

1×	iter limit
1×	node limit

Counts

864 → 864

Calls

Call 1

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

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

rewrite335.0ms (1.3%)

Memory

9.7MiB live, 488.4MiB allocated

Rules

4 226×	`lower-/.f32`
4 202×	`lower-/.f64`
3 972×	`lower-*.f32`
3 932×	`lower-*.f64`
2 474×	`lower-pow.f32`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	71	326
0	117	303
1	396	260
2	3315	251
0	8449	251

Stop Event

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

Counts

21 → 1 129

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

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

eval339.0ms (1.3%)

Memory: 65.2MiB live, 744.2MiB allocated
Compiler: Compiled 96 516 to 5 241 computations (94.6% saved)

prune989.0ms (3.9%)

Memory

-97.5MiB live, 1 341.5MiB allocated

Pruning

67 alts after pruning (66 fresh and 1 done)

	Pruned	Kept	Total
New	2 670	58	2 728
Fresh	23	8	31
Picked	4	1	5
Done	0	0	0
Total	2 697	67	2 764

Accuracy

93.6%

Counts

2 764 → 67

Alt Table

Click to see full alt table

Status	Accuracy	Program
	21.6%	(fma.f64 (.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) #s(literal 1/2 binary64)) (/.f64 (.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (neg.f64 h)) l) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	22.9%	(/.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (.f64 (/.f64 d h) (neg.f64 d)))) (sqrt.f64 (neg.f64 l)))
	31.9%	(/.f64 (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	31.9%	(/.f64 (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	28.5%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	29.7%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h))
	37.4%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	29.3%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 #s(literal 1/4 binary64) (.f64 d d)))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	29.9%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (/.f64 (.f64 h #s(literal 1/2 binary64)) (.f64 (.f64 d d) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	25.2%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) (sqrt.f64 d)) (sqrt.f64 l))
	20.2%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) #s(approx (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 D (.f64 D (/.f64 (.f64 h (.f64 M M)) l))) (.f64 d d)) (.f64 d d)))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
▶	10.9%	(/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	22.7%	(/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	44.4%	(.f64 (fma.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/2 binary64)) (.f64 d (.f64 d #s(literal 4 binary64)))) (.f64 (/.f64 h l) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	32.4%	(.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	26.4%	(.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))))
	53.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 M D) (.f64 (.f64 M D) (.f64 #s(literal 1/8 binary64) (/.f64 h l)))) (.f64 d d))))
	60.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal -2 binary64)))))))
	39.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	35.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	59.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.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 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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.7%	(.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 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	39.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
▶	65.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	38.9%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	38.0%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	47.8%	(.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	38.9%	(.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 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	53.8%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) d) (/.f64 (/.f64 (.f64 h #s(literal -1/2 binary64)) l) (*.f64 d #s(literal 4 binary64))) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	61.9%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	60.2%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	49.4%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (/.f64 M d) (/.f64 M d)) (.f64 #s(literal 1/4 binary64) (.f64 D D))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	53.7%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 #s(literal 1/4 binary64) (.f64 d d)))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	48.4%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (/.f64 (.f64 h #s(literal 1/2 binary64)) (.f64 (.f64 d d) l))))) (sqrt.f64 (/.f64 d l)))
	41.1%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) #s(approx (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1) (fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64)))) (sqrt.f64 (/.f64 d l)))
	39.5%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) #s(approx (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 h (.f64 M M)) (*.f64 d d)) l) l))) (sqrt.f64 (/.f64 d l)))
	35.6%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) #s(approx (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 D (.f64 D (/.f64 (.f64 h (.f64 M M)) l))) (.f64 d d)) (.f64 d d)))) (sqrt.f64 (/.f64 d l)))
	21.5%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) #s(approx (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1) (/.f64 (.f64 (.f64 M M) (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 D D)))) (.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))
▶	29.6%	(.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (*.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
	13.2%	(.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)))) (sqrt.f64 (/.f64 d l)))
	9.9%	(.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (/.f64 d l)))
	34.8%	(.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	17.2%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (/.f64 (fma.f64 d (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) d))
	14.0%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))) (*.f64 l l)))
	12.8%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (.f64 (.f64 M M) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 D D)) d))))
	14.4%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) d)))))
	26.5%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
	25.0%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 (.f64 h h) l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (.f64 l l) h)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d))))))
	24.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (*.f64 l l))))))) h))
	35.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
	14.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
	15.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 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
	18.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) d)) (sqrt.f64 (.f64 (/.f64 h d) l))))
▶	24.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))
	28.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
	14.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
▶	12.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
	22.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 h))))
	2.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 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 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 h l)))))
	24.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))))
	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 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) h))))
✓	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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h 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 d (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) h)))))
	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 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))))
	23.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 (exp.f64 (.f64 (log.f64 (*.f64 h l)) #s(literal -1/2 binary64)))))
	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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))))

Compiler

Compiled 4 224 to 2 662 computations (37% saved)

simplify155.0ms (0.6%)

Memory

-4.2MiB live, 344.7MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

6 798×	`lower-*.f32`
6 736×	`lower-*.f64`
4 188×	`lower-/.f32`
4 158×	`lower-/.f64`
1 844×	`times-frac`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	99	809
0	161	778
1	336	740
2	1140	723
3	5623	723
0	8048	712

Stop Event

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

Calls

Call 1

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

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

localize433.0ms (1.7%)

Memory

39.9MiB live, 694.4MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	1.7022467925235991	(.f64 (.f64 M (.f64 D (.f64 M D))) (*.f64 h #s(literal -1/2 binary64)))
accuracy	5.72663619369367	(.f64 (.f64 d (*.f64 d #s(literal 4 binary64))) l)
accuracy	7.318934754668995	(/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))
accuracy	7.380922896369972	(sqrt.f64 (/.f64 d h))
accuracy	6.179562046947501	(.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))
accuracy	9.444770366875863	(.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))
accuracy	10.69367740144013	(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
accuracy	16.158317306588934	#s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l)))))
accuracy	6.731492950987101	(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))
accuracy	8.80124727169719	(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
accuracy	8.879523355356733	(.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))
accuracy	32.03747858119404	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
accuracy	0	(*.f64 h l)
accuracy	0.109375	(/.f64 d (sqrt.f64 (*.f64 h l)))
accuracy	8.04553518221431	(sqrt.f64 (*.f64 h l))
accuracy	31.19940015494215	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))
accuracy	2.896313728320978	(/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (*.f64 d #s(literal 2 binary64))) l)
accuracy	3.8958633343253815	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
accuracy	7.380922896369972	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	9.344063690903894	(sqrt.f64 (/.f64 d l))

Samples

111.0ms	124×	0	invalid
110.0ms	132×	0	valid

Compiler

Compiled 737 to 89 computations (87.9% saved)

Precisions

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

ival-mult: 67.0ms (37.9% of total)

ival-pow: 46.0ms (26.1% of total)

ival-div: 41.0ms (23.2% of total)

ival-sqrt: 11.0ms (6.2% of total)

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

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

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

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

exact: 1.0ms (0.6% of total)

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

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

series199.0ms (0.8%)

Memory

-28.2MiB live, 307.2MiB allocated

Counts

28 → 1 176

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

Outputs
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (pow M 2)) l)) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) (patch (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.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 (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (patch (/.f64 (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor 0 d) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d) (taylor 0 d) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d) (taylor 0 d) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d) (taylor 0 d) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf d) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))) (taylor inf d) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))) (taylor inf d) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))) (taylor inf d) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf d) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))) (taylor -inf d) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))) (taylor -inf d) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))) (taylor -inf d) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h) (taylor 0 h) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h) (taylor 0 h) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h) (taylor 0 h) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor inf h) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3)))))) (taylor inf h) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3)))))) (taylor inf h) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3)))))) (taylor inf h) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt h))) (taylor -inf h) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h))))))) (taylor -inf h) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h))))))) (taylor -inf h) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h))))))) (taylor -inf h) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 M) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 M) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 M) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 M) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor inf M) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor inf M) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor inf M) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor inf M) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor -inf M) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor -inf M) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor -inf M) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h))))) (taylor -inf M) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor 0 D) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 D) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 D) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor 0 D) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor inf D) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor inf D) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor inf D) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor inf D) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor -inf D) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor -inf D) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor -inf D) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h))))) (taylor -inf D) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (taylor 0 l) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l) (taylor 0 l) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l) (taylor 0 l) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l) (taylor 0 l) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor inf l) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor inf l) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor inf l) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor inf l) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 h))) (taylor -inf l) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf l) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf l) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h)))) (taylor -inf l) (#s(alt (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) (patch (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) (sqrt.f64 (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) 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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<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 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l))))) (patch #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf M) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf D) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf h) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf h) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 d) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 l) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))) (patch (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 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 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) (patch (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<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 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (patch (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.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 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow d 3))) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (patch (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) 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 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor 0 d) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor 0 d) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor 0 d) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor 0 d) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor inf d) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor inf d) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor inf d) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor inf d) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor -inf d) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor -inf d) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor -inf d) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor -inf d) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor 0 l) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor 0 l) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor 0 l) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor 0 l) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor inf l) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor inf l) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor inf l) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor inf l) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor -inf l) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor -inf l) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor -inf l) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 4 (* (pow d 2) l)) (taylor -inf l) (#s(alt (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) (patch (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor 0 M) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor 0 M) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor 0 M) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor 0 M) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor inf M) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor inf M) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor inf M) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor inf M) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor -inf M) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor -inf M) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor -inf M) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor -inf M) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor 0 D) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor 0 D) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor 0 D) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor 0 D) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor inf D) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor inf D) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor inf D) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor inf D) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor -inf D) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor -inf D) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor -inf D) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor -inf D) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor 0 h) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor 0 h) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor 0 h) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor 0 h) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor inf h) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor inf h) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor inf h) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor inf h) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor -inf h) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor -inf h) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor -inf h) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow D 2) (* (pow M 2) h))) (taylor -inf h) (#s(alt (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (patch (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())

Calls

294 calls:

Time	Variable		Point	Expression
15.0ms	h	@	inf	(* (sqrt (/ h (* l (* l l)))) (* (* D D) (/ (* (* M M) -1/8) d)))
15.0ms	l	@	0	(* (sqrt (/ h (* l (* l l)))) (* (* D D) (/ (* (* M M) -1/8) d)))
3.0ms	M	@	0	(* (sqrt (/ h (* l (* l l)))) (* (* D D) (/ (* (* M M) -1/8) d)))
2.0ms	l	@	inf	(* (* (+ 1 (/ (* (* M (* D (* M D))) (* h -1/2)) (* (* d (* d 4)) l))) (sqrt (neg d))) (/ 1 (sqrt (neg l))))
2.0ms	h	@	0	(* (sqrt (/ h (* l (* l l)))) (* (* D D) (/ (* (* M M) -1/8) d)))

simplify344.0ms (1.3%)

Memory

-11.1MiB live, 533.2MiB allocated

Algorithm

1×	egg-herbie

Rules

8 340×	`lower-*.f64`
8 340×	`lower-*.f32`
5 550×	`lower-fma.f64`
5 550×	`lower-fma.f32`
2 722×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	380	20345
1	1128	19789
2	4205	19716
3	6725	19668
0	8464	19287

Stop Event

1×	iter limit
1×	node limit

Counts

1 176 → 1 176

Calls

Call 1

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

Outputs
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/2 (/ (* D (* M h)) d))
(.f64 D (.f64 (/.f64 (*.f64 h M) d) #s(literal 1/2 binary64)))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) M) D) (*.f64 d 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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 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 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 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 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(sqrt (* h l))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 h l))
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* h l)
(*.f64 h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 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 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 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 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(/ h (pow l 3))
(/.f64 h (.f64 l (.f64 l l)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* 1/8 (/ (* (pow D 2) (pow M 2)) l))
(.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))
(* -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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 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 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 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 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (*.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/.f64 (fma.f64 d (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) l)) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/.f64 (fma.f64 d (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) l)) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) l) (sqrt h))) (* (* (pow d 2) (sqrt -1)) (sqrt (/ 1 h)))) d)
(/.f64 (fma.f64 d (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) l)) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))) d)
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(.f64 d (fma.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 D (.f64 D (.f64 M M)))) (/.f64 (sqrt.f64 h) (.f64 d (*.f64 d l)))))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(.f64 d (fma.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 D (.f64 D (.f64 M M)))) (/.f64 (sqrt.f64 h) (.f64 d (*.f64 d l)))))))
(* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1))))
(.f64 d (fma.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 D (.f64 D (.f64 M M)))) (/.f64 (sqrt.f64 h) (.f64 d (*.f64 d l)))))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(neg.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(.f64 (fma.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 D (.f64 D (.f64 M M)))) (/.f64 (sqrt.f64 h) (.f64 d (*.f64 d l)))))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(.f64 (fma.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 D (.f64 D (.f64 M M)))) (/.f64 (sqrt.f64 h) (.f64 d (*.f64 d l)))))) (neg.f64 d))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* (pow d 2) l)) (sqrt h))) (* (sqrt (/ 1 h)) (sqrt -1)))))
(.f64 (fma.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 D (.f64 D (.f64 M M)))) (/.f64 (sqrt.f64 h) (.f64 d (*.f64 d l)))))) (neg.f64 d))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/.f64 (fma.f64 (sqrt.f64 (.f64 h (.f64 h h))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d (sqrt.f64 h)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/.f64 (fma.f64 (sqrt.f64 (.f64 h (.f64 h h))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d (sqrt.f64 h)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (pow h 3)))) (* (* d (sqrt -1)) (sqrt h))) h)
(/.f64 (fma.f64 (sqrt.f64 (.f64 h (.f64 h h))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d (sqrt.f64 h)))) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (*.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(.f64 h (fma.f64 d (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 h h))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 D (.f64 D (.f64 M M)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 d l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(.f64 h (fma.f64 d (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 h h))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 D (.f64 D (.f64 M M)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 d l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt (/ 1 h)))) (* (* d (sqrt -1)) (sqrt (/ 1 (pow h 3))))))
(.f64 h (fma.f64 d (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 h h))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 D (.f64 D (.f64 M M)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 d l))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt h)))
(.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 h) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 d l))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(.f64 (fma.f64 d (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 h h))))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 d l))))) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(.f64 (fma.f64 d (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 h h))))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 d l))))) (neg.f64 h))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 3)) (sqrt (/ 1 (pow h 3))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 3))) (* d l)) (sqrt (/ 1 h)))))))
(.f64 (fma.f64 d (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 h h))))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (*.f64 d l))))) (neg.f64 h))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (*.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(.f64 (.f64 M M) (fma.f64 d (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (.f64 M M)) (.f64 (sqrt.f64 h) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) D) D)) (*.f64 d l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(.f64 (.f64 M M) (fma.f64 d (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (.f64 M M)) (.f64 (sqrt.f64 h) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) D) D)) (*.f64 d l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(.f64 (.f64 M M) (fma.f64 d (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (.f64 M M)) (.f64 (sqrt.f64 h) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) D) D)) (*.f64 d l)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (*.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(.f64 (.f64 M M) (fma.f64 d (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (.f64 M M)) (.f64 (sqrt.f64 h) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) D) D)) (*.f64 d l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(.f64 (.f64 M M) (fma.f64 d (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (.f64 M M)) (.f64 (sqrt.f64 h) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) D) D)) (*.f64 d l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (* (pow D 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow M 2)) (sqrt (/ 1 h)))))
(.f64 (.f64 M M) (fma.f64 d (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) h))) (.f64 M M)) (.f64 (sqrt.f64 h) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) D) D)) (*.f64 d l)))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (*.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(.f64 (.f64 D D) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 h) (.f64 M M)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))) (*.f64 D D))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(.f64 (.f64 D D) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 h) (.f64 M M)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))) (*.f64 D D))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(.f64 (.f64 D D) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 h) (.f64 M M)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))) (*.f64 D D))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (*.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(.f64 (.f64 D D) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 h) (.f64 M M)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))) (*.f64 D D))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(.f64 (.f64 D D) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 h) (.f64 M M)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))) (*.f64 D D))))
(* (pow D 2) (+ (* -1/8 (* (/ (* (pow M 2) (sqrt -1)) (* d l)) (sqrt h))) (* (/ (* d (sqrt -1)) (pow D 2)) (sqrt (/ 1 h)))))
(.f64 (.f64 D D) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 h) (.f64 M M)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))) (*.f64 D D))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h)))
(.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (*.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/.f64 (fma.f64 d (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 (sqrt.f64 #s(literal -1 binary64)) l)) (.f64 (.f64 (.f64 D D) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))) l)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/.f64 (fma.f64 d (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 (sqrt.f64 #s(literal -1 binary64)) l)) (.f64 (.f64 (.f64 D D) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))) l)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) d) (sqrt h))) (* (* d (* l (sqrt -1))) (sqrt (/ 1 h)))) l)
(/.f64 (fma.f64 d (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 (sqrt.f64 #s(literal -1 binary64)) l)) (.f64 (.f64 (.f64 D D) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)))) l)
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(* (* d (sqrt -1)) (sqrt (/ 1 h)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (sqrt -1))) (* d l)) (sqrt h))) (* (* d (sqrt -1)) (sqrt (/ 1 h))))
(fma.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 d l))) (.f64 (sqrt.f64 h) #s(literal -1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (.f64 d (sqrt.f64 #s(literal -1 binary64)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 d (*.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 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (.f64 d h)) (.f64 D D)) (/.f64 (.f64 M M) l)) (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 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (.f64 d h)) (.f64 D D)) (/.f64 (.f64 M M) l)) (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 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (.f64 d h)) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d 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 d (fma.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d h)))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d h)))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d h)))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d h))) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (neg.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) l))))))
(* -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 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d h))) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (neg.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) l))))))
(* -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 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d h))) (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (neg.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) l))))))
(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 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (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 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (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 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 d (.f64 d d)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (*.f64 d h))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 h (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d (.f64 (.f64 d d) h))))) (sqrt.f64 (/.f64 d (.f64 h (.f64 h h))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 h (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d (.f64 (.f64 d d) h))))) (sqrt.f64 (/.f64 d (.f64 h (.f64 h h))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 h (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 D D) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d (.f64 (.f64 d d) h))))) (sqrt.f64 (/.f64 d (.f64 h (.f64 h h))))))
(* -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) (.f64 (.f64 D D) (.f64 (neg.f64 (.f64 M M)) (sqrt.f64 (/.f64 h (.f64 d (*.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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d (.f64 (.f64 d d) h)))) (neg.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))) (sqrt.f64 (/.f64 d (.f64 h (.f64 h h))))) (neg.f64 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d (.f64 (.f64 d d) h)))) (neg.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))) (sqrt.f64 (/.f64 d (.f64 h (.f64 h h))))) (neg.f64 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d (.f64 (.f64 d d) h)))) (neg.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))) (sqrt.f64 (/.f64 d (.f64 h (.f64 h h))))) (neg.f64 h))
(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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 d (*.f64 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 M M) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) l))) (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 M M) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) l))) (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 M M) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) l))) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 d (*.f64 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 M M) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) l))) (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 M M) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) l))) (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 M M) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) l))) (sqrt.f64 (/.f64 d h)))
(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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 d (*.f64 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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 d (*.f64 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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 d h)) l (.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 d h)) l (.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 (sqrt.f64 (/.f64 d h)) l (.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))))) l)
(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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (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 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) l)) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 D D)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 D D)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 D D)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 D D)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 D D)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 D D)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (sqrt.f64 (/.f64 d l)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 h (.f64 M M)))) (sqrt.f64 (/.f64 d (.f64 l (.f64 l l))))) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 h (.f64 M M)))) (sqrt.f64 (/.f64 d (.f64 l (.f64 l l))))) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 h (.f64 M M)))) (sqrt.f64 (/.f64 d (.f64 l (.f64 l l))))) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (.f64 d d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 h (.f64 M M)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d l)))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 h (.f64 M M)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d l)))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 h (.f64 M M)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d l)))))
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))))
(neg.f64 (.f64 d (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 h (.f64 M M)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d l))))))
(* -1 (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))))
(neg.f64 (.f64 d (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 h (.f64 M M)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d l))))))
(* -1 (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))))
(neg.f64 (.f64 d (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 h (.f64 M M)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 d l))))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 h (.f64 M M)) (sqrt.f64 (/.f64 l (.f64 d (.f64 d d)))))) (sqrt.f64 (.f64 d (.f64 l (.f64 l l))))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 h (.f64 M M)) (sqrt.f64 (/.f64 l (.f64 d (.f64 d d)))))) (sqrt.f64 (.f64 d (.f64 l (.f64 l l))))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 h (.f64 M M)) (sqrt.f64 (/.f64 l (.f64 d (.f64 d d)))))) (sqrt.f64 (.f64 d (.f64 l (.f64 l l))))) (*.f64 l l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 h (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d))))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M))) (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 h (.f64 M M)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d)))))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 h (.f64 M M)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d)))))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 h (.f64 M M)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 l l)) (.f64 d (.f64 d d)))))) (neg.f64 (sqrt.f64 (/.f64 d l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 M M) (.f64 (.f64 D D) (.f64 (/.f64 h (.f64 d (.f64 d l))) #s(literal -1/8 binary64))) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 M M) (.f64 (.f64 D D) (.f64 (/.f64 h (.f64 d (.f64 d l))) #s(literal -1/8 binary64))) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 M M) (.f64 (.f64 D D) (.f64 (/.f64 h (.f64 d (.f64 d l))) #s(literal -1/8 binary64))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 M M) (.f64 (.f64 D D) (.f64 (/.f64 h (.f64 d (.f64 d l))) #s(literal -1/8 binary64))) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 M M) (.f64 (.f64 D D) (.f64 (/.f64 h (.f64 d (.f64 d l))) #s(literal -1/8 binary64))) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 M M) (.f64 (.f64 D D) (.f64 (/.f64 h (.f64 d (.f64 d l))) #s(literal -1/8 binary64))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (/.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d (.f64 d l))) (neg.f64 h) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (/.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d (.f64 d l))) (neg.f64 h) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (/.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d (.f64 d l))) (neg.f64 h) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 D D) (.f64 (/.f64 (.f64 h (.f64 M M)) l) #s(literal -1/8 binary64)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 D D) (.f64 (/.f64 (.f64 h (.f64 M M)) l) #s(literal -1/8 binary64)) (.f64 d d)) (.f64 d d))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(/.f64 (fma.f64 (.f64 D D) (.f64 (/.f64 (.f64 h (.f64 M M)) l) #s(literal -1/8 binary64)) (.f64 d d)) (.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 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h)) (.f64 d (*.f64 d l)))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 h (*.f64 d d))) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 h (*.f64 d d))) l) l)
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 h (*.f64 d d))) l) l)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) h) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 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 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(neg.f64 (.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 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 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 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 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 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 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (neg.f64 (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (neg.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 M M) (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 D D) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (/.f64 d (*.f64 M M)))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.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)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(.f64 (.f64 D D) (fma.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(sqrt (/ h (pow d 3)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(* -1 (* (sqrt (/ h (pow d 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d 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) (.f64 (.f64 D D) (.f64 (neg.f64 (.f64 M M)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) l)
(* -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) (.f64 (.f64 D D) (.f64 (neg.f64 (.f64 M M)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) l)
(* -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) (.f64 (.f64 D D) (.f64 (neg.f64 (.f64 M M)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) l)
(* -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) (.f64 (.f64 D D) (.f64 (neg.f64 (.f64 M M)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) l)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d 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) (.f64 (.f64 D D) (.f64 (neg.f64 (.f64 M M)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) l)
(* -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) (.f64 (.f64 D D) (.f64 (neg.f64 (.f64 M M)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) l)
(* -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) (.f64 (.f64 D D) (.f64 (neg.f64 (.f64 M M)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) l)
(* -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) (.f64 (.f64 D D) (.f64 (neg.f64 (.f64 M M)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) l)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* 4 (* (pow d 2) l))
(.f64 (.f64 d (*.f64 d l)) #s(literal 4 binary64))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))
(* -1/2 (* (pow D 2) (* (pow M 2) h)))
(.f64 (.f64 D D) (.f64 (.f64 h (*.f64 M M)) #s(literal -1/2 binary64)))

rewrite306.0ms (1.2%)

Memory

20.1MiB live, 537.8MiB allocated

Rules

5 176×	`lower-*.f32`
5 114×	`lower-*.f64`
3 294×	`lower-/.f32`
3 264×	`lower-/.f64`
3 196×	`lower-pow.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	99	539
0	161	496
1	535	440
2	4226	432
0	8625	423

Stop Event

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

Counts

28 → 808

Calls

Call 1

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

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

eval228.0ms (0.9%)

Memory: 8.5MiB live, 528.9MiB allocated
Compiler: Compiled 64 320 to 3 513 computations (94.5% saved)

prune626.0ms (2.4%)

Memory

9.6MiB live, 816.7MiB allocated

Pruning

75 alts after pruning (73 fresh and 2 done)

	Pruned	Kept	Total
New	1 953	31	1 984
Fresh	19	42	61
Picked	4	1	5
Done	0	1	1
Total	1 976	75	2 051

Accuracy

93.6%

Counts

2 051 → 75

Alt Table

Click to see full alt table

Status	Accuracy	Program
	22.9%	(/.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (.f64 (/.f64 d h) (neg.f64 d)))) (sqrt.f64 (neg.f64 l)))
	31.9%	(/.f64 (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	28.5%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	37.4%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	29.3%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 #s(literal 1/4 binary64) (.f64 d d)))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	13.9%	(/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (neg.f64 l)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	11.5%	(/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 (neg.f64 (/.f64 (.f64 M M) l)) (*.f64 D #s(literal -1/8 binary64))) D))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	10.9%	(/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #s(approx ( (* -1/8 (* D D)) (neg (/ (* M M) l))) (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	22.7%	(/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	44.4%	(.f64 (fma.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/2 binary64)) (.f64 d (.f64 d #s(literal 4 binary64)))) (.f64 (/.f64 h l) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	32.4%	(.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	25.8%	(.f64 (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (.f64 d d)))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
	48.4%	(.f64 (.f64 (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (*.f64 d d)))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	39.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	35.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	59.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.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 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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.7%	(.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 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	39.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	38.9%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	47.8%	(.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	38.9%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	53.8%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) d) (/.f64 (/.f64 (.f64 h #s(literal -1/2 binary64)) l) (*.f64 d #s(literal 4 binary64))) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	61.9%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
▶	60.2%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	49.4%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (/.f64 M d) (/.f64 M d)) (.f64 #s(literal 1/4 binary64) (.f64 D D))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	53.7%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 #s(literal 1/4 binary64) (.f64 d d)))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
▶	65.8%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	41.1%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) #s(approx (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1) (fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64)))) (sqrt.f64 (/.f64 d l)))
	39.5%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) #s(approx (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 h (.f64 M M)) (*.f64 d d)) l) l))) (sqrt.f64 (/.f64 d l)))
	21.5%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) #s(approx (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1) (/.f64 (.f64 (.f64 M M) (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 D D)))) (.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))
	10.0%	(.f64 (sqrt.f64 (/.f64 d l)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (/.f64 (.f64 (.f64 (.f64 D (.f64 D #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (*.f64 M M)) (neg.f64 l))))
	25.7%	(.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (.f64 (sqrt.f64 d) (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (*.f64 d d)))) #s(literal 1 binary64))) (sqrt.f64 l)))
	27.3%	(.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (/.f64 M (.f64 d d))) (.f64 (.f64 D (*.f64 M D)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
	33.0%	(.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (fma.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (.f64 d d))))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
	29.9%	(.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (fma.f64 (.f64 D (.f64 M D)) (.f64 M (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (.f64 d d))))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
	32.1%	(.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 l d) (*.f64 d #s(literal 4 binary64))))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
	29.8%	(.f64 (sqrt.f64 (/.f64 d h)) (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (*.f64 d d)))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 l)))))
	34.8%	(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (* (+ 1 (/ (* (* M (* D (* M D))) (* h -1/2)) (* (* d (* d 4)) l))) (sqrt (neg d))) (/ 1 (sqrt (neg l)))) (sqrt.f64 (/.f64 d l))))
	7.5%	(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (* (+ 1 (/ (* (* M (* D (* M D))) (* h -1/2)) (* (* d (* d 4)) l))) (sqrt (neg d))) (/ 1 (sqrt (neg l)))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
	13.2%	(.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)))) (sqrt.f64 (/.f64 d l)))
▶	19.3%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))))
	17.2%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (/.f64 (fma.f64 d (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l)))) #s(literal -1/8 binary64)))) d))
	14.0%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))) (*.f64 l l)))
	14.4%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) d)))))
	26.5%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
	24.3%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 l (.f64 h h)) h))) (/.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l)))))) d))))
	24.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (*.f64 l l))))))) 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 d (sqrt.f64 h)) (sqrt.f64 l)))
	16.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 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) d) (sqrt.f64 h)) (sqrt.f64 (.f64 l (*.f64 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 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (sqrt.f64 h)) (.f64 d (sqrt.f64 (.f64 l (.f64 l l))))))
	35.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
	14.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
	15.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 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
	18.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) d)) (sqrt.f64 (.f64 (/.f64 h d) l))))
	22.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓	24.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h 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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) d)))
	28.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
	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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 h l))) d))
	13.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 (/.f64 (/.f64 h l) l) l)) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
	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 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))))
	13.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 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 (.f64 M M) #s(literal 1/8 binary64)) (*.f64 D D)) (neg.f64 d))))
	14.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (/.f64 #s(literal -1/8 binary64) d))) (*.f64 D D))))
	18.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 D (*.f64 M D))) (/.f64 #s(literal -1/8 binary64) d))))
	14.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
	22.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 h))))
	2.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 l)))))
	24.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))))
	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 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) h))))
✓	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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h 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 d (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) h)))))
▶	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 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))))
	23.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 (exp.f64 (.f64 (log.f64 (*.f64 h l)) #s(literal -1/2 binary64)))))
	14.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 D (.f64 (.f64 (.f64 D (.f64 M M)) (/.f64 #s(literal -1/8 binary64) d)) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l)))))))
▶	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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))))

Compiler

Compiled 4 426 to 2 828 computations (36.1% saved)

simplify199.0ms (0.8%)

Memory

7.3MiB live, 241.3MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

6 004×	`lower-*.f32`
5 958×	`lower-*.f64`
4 088×	`lower-/.f32`
4 062×	`lower-/.f64`
1 870×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	93	706
0	144	662
1	311	618
2	1129	616
3	4687	616
4	7267	616
0	8003	611

Stop Event

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

Calls

Call 1

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

localize361.0ms (1.4%)

Memory

2.2MiB live, 495.4MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	2.208064843560909	(/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))
accuracy	5.540305774755263	(fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))
accuracy	7.380922896369969	(sqrt.f64 (/.f64 d h))
accuracy	9.344063690903885	(sqrt.f64 (/.f64 d l))
accuracy	7.891456327633264	(.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))
accuracy	7.908673738417837	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
accuracy	8.80124727169719	(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
accuracy	9.061808701666049	(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
accuracy	0.19920569999419097	(/.f64 #s(literal 1 binary64) (*.f64 h l))
accuracy	7.908673738417837	(sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
accuracy	9.431836656775127	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (*.f64 h l))))
accuracy	31.19940015494215	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))))
accuracy	0	(*.f64 d d)
accuracy	4.724628650071155	(/.f64 (.f64 d d) (.f64 h l))
accuracy	12.87246023026138	(sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))
accuracy	16.75073340419149	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))))
accuracy	2.896313728320978	(/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (*.f64 d #s(literal 2 binary64))) l)
accuracy	3.8958633343253815	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
accuracy	7.380922896369969	(sqrt.f64 (/.f64 d h))
accuracy	9.344063690903885	(sqrt.f64 (/.f64 d l))

Samples

143.0ms	132×	0	valid
117.0ms	124×	0	invalid

Compiler

Compiled 668 to 86 computations (87.1% saved)

Precisions

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

ival-mult: 105.0ms (46.7% of total)

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

ival-pow: 34.0ms (15.1% of total)

ival-sqrt: 17.0ms (7.6% of total)

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

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

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

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

exact: 1.0ms (0.4% of total)

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

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

series109.0ms (0.4%)

Memory

-6.0MiB live, 229.8MiB allocated

Counts

30 → 1 248

Calls

Call 1

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

Outputs
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation 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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation 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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #<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 (* 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 (* 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 (* 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 (* 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 (* (* 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 (* 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 (* 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 (* (* 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 (/ (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 (/ (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 (/ (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 (/ (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 (/ (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 (/ (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 (/ (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 (/ (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 (/ (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 (pow d 2) (taylor 0 d) (#s(alt (.f64 d d) (patch (.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor 0 d) (#s(alt (.f64 d d) (patch (.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor 0 d) (#s(alt (.f64 d d) (patch (.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor 0 d) (#s(alt (.f64 d d) (patch (.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor inf d) (#s(alt (.f64 d d) (patch (.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor inf d) (#s(alt (.f64 d d) (patch (.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor inf d) (#s(alt (.f64 d d) (patch (.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor inf d) (#s(alt (.f64 d d) (patch (.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor -inf d) (#s(alt (.f64 d d) (patch (.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor -inf d) (#s(alt (.f64 d d) (patch (.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor -inf d) (#s(alt (.f64 d d) (patch (.f64 d d) #<representation binary64>) () ())) ())
#s(alt (pow d 2) (taylor -inf d) (#s(alt (.f64 d d) (patch (.f64 d d) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ -1 (* h l)) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ -1 (* h l)) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ -1 (* h l)) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ -1 (* h l)) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ -1 (* h l)) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ -1 (* h l)) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ -1 (* h l)) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ -1 (* h l)) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor 0 h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor 0 h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor 0 h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor 0 h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor -inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor -inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor -inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor -inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* (pow h 2) (pow l 2))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<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 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 D) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 D) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 D) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf D) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf D) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf D) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf D) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf D) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf D) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h) (taylor 0 h) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h) (taylor 0 h) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h) (taylor 0 h) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* 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 (* (pow h 3) l))))))) (taylor -inf h) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* 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 (* (pow h 3) l))))))) (taylor -inf h) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* 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 (* (pow h 3) l))))))) (taylor -inf h) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2)) (taylor 0 l) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2)) (taylor 0 l) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2)) (taylor 0 l) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor inf l) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor inf l) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor inf l) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (* 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)))))) (taylor -inf l) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (* 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)))))) (taylor -inf l) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (* 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)))))) (taylor -inf l) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 M) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 M) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))) (taylor 0 M) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf M) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf M) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor inf M) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf M) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf M) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))))) (taylor -inf M) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d) (taylor 0 d) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d) (taylor 0 d) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d) (taylor 0 d) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* 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 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (patch (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (patch #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf h) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))) (taylor -inf l) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) (patch (neg.f64 (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d))) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) (patch (.f64 (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (/.f64 (.f64 M M) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 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 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (patch (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor inf D) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor inf D) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor inf D) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor inf D) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor inf M) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor inf M) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor inf M) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor inf M) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor inf d) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor inf d) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor inf d) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor inf d) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) (patch (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) #<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 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #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 l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (sqrt -1)) (taylor -inf h) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (sqrt -1)) (taylor -inf h) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (sqrt -1)) (taylor -inf h) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (sqrt -1)) (taylor -inf h) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (sqrt -1)) (taylor -inf l) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (sqrt -1)) (taylor -inf l) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (sqrt -1)) (taylor -inf l) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (sqrt -1)) (taylor -inf l) (#s(alt (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) (patch (.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())

Calls

312 calls:

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

simplify308.0ms (1.2%)

Memory

31.9MiB live, 488.2MiB allocated

Algorithm

1×	egg-herbie

Rules

7 522×	`lower-*.f64`
7 522×	`lower-*.f32`
4 618×	`lower-fma.f64`
4 618×	`lower-fma.f32`
3 552×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	303	19578
1	890	18881
2	3072	18781
3	7359	18712
0	8046	18400

Stop Event

1×	iter limit
1×	node limit

Counts

1 248 → 1 248

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

Outputs
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/2 (/ (* D (* M h)) d))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 D (*.f64 M h)) d))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) (* d l)))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) (*.f64 d l))
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
(* 1/4 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 D M)) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (neg.f64 (.f64 M M))) (.f64 d d))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (neg.f64 (.f64 M M))) (.f64 d d))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (neg.f64 (.f64 M M))) (.f64 d d))))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 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 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 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 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 h h))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(/ (pow d 2) (* h l))
(.f64 d (/.f64 d (.f64 h l)))
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(pow d 2)
(*.f64 d d)
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ -1 (* h l))
(/.f64 #s(literal -1 binary64) (*.f64 h l))
(/ -1 (* h l))
(/.f64 #s(literal -1 binary64) (*.f64 h l))
(/ -1 (* h l))
(/.f64 #s(literal -1 binary64) (*.f64 h l))
(/ -1 (* h l))
(/.f64 #s(literal -1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ -1 (* h l))
(/.f64 #s(literal -1 binary64) (*.f64 h l))
(/ -1 (* h l))
(/.f64 #s(literal -1 binary64) (*.f64 h l))
(/ -1 (* h l))
(/.f64 #s(literal -1 binary64) (*.f64 h l))
(/ -1 (* h l))
(/.f64 #s(literal -1 binary64) (*.f64 h l))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(/ 1 (* (pow h 2) (pow l 2)))
(/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (neg.f64 (.f64 M M))) (.f64 d d))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (neg.f64 (.f64 M M))) (.f64 d d))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (neg.f64 (.f64 M M))) (.f64 d d))))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 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 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 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 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 h h))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* (* d (sqrt -1)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (*.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (* d (sqrt -1)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (*.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (* d (sqrt -1)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (*.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (* d (sqrt -1)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (*.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* (* d (sqrt -1)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (*.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (* d (sqrt -1)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (*.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (* d (sqrt -1)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (*.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* (* d (sqrt -1)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (*.f64 d (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* (pow D 2) (+ (* -1 (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l))))) (*.f64 (sqrt.f64 (/.f64 h l)) (neg.f64 d))) h)
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l))))) (*.f64 (sqrt.f64 (/.f64 h l)) (neg.f64 d))) h)
(/ (+ (* -1 (* d (sqrt (/ h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))) h)
(/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l))))) (*.f64 (sqrt.f64 (/.f64 h l)) (neg.f64 d))) h)
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 h h))))))))
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 h h))))))))
(* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3))))))))
(.f64 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 h h))))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1 (* h (+ (* 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 (* (pow h 3) l)))))))
(.f64 h (-.f64 (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1 (* h (+ (* 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 (* (pow h 3) l)))))))
(.f64 h (-.f64 (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1 (* h (+ (* 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 (* (pow h 3) l)))))))
(.f64 h (-.f64 (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2))
(/.f64 (fma.f64 (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (neg.f64 d) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (*.f64 l l))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2))
(/.f64 (fma.f64 (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (neg.f64 d) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (*.f64 l l))
(/ (+ (* -1 (* d (sqrt (/ (pow l 3) h)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l))))) (pow l 2))
(/.f64 (fma.f64 (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (neg.f64 d) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (*.f64 l l))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))
(+ (* -1 (* (* 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))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))
(+ (* -1 (* (* 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))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1 (* d (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* (pow M 2) (+ (* -1 (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))) (* 1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 M M))) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 M M))) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) d)
(/ (+ (* -1 (* (pow d 2) (sqrt (/ 1 (* h l))))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3)))))) d)
(/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 M M))) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) d)
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) (.f64 d d))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) (.f64 d d))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) (.f64 d d))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) (.f64 d d))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) (.f64 d d))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) (.f64 d d))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) (.f64 d d))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) (.f64 d d))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) (.f64 d d))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 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 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 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 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 h h))))))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* -1 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 D (.f64 D (.f64 M M))) (neg.f64 d)))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))
(.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(/.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 D D)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M 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)) (.f64 M M)) (*.f64 d d))
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* 1/4 (/ (* (pow D 2) M) d))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 M (*.f64 D D))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (neg.f64 (.f64 M M))) (.f64 d d))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (neg.f64 (.f64 M M))) (.f64 d d))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (neg.f64 (.f64 M M))) (.f64 d d))))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 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 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 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 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 h h))))))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) l)
(/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (.f64 h d)))) (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 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (.f64 h d)))) (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 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (.f64 h d)))) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d 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 d (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h d)))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h d)))))
(* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5)))))))
(.f64 d (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h 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 (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))) (neg.f64 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 (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))) (neg.f64 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 (.f64 (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 5 binary64)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (.f64 M M) l)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h d)))) (neg.f64 d))
(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 D (/.f64 (.f64 D (.f64 M M)) l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 d (.f64 d d)))) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 h 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 D (/.f64 (.f64 D (.f64 M M)) l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 d (.f64 d d)))) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 h 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 D (/.f64 (.f64 D (.f64 M M)) l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 d (.f64 d d)))) #s(literal -1/8 binary64)) (sqrt.f64 (*.f64 h d))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) l)
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 d (.f64 d d))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d (.f64 h (.f64 h h))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 d (.f64 d d))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d (.f64 h (.f64 h h))))))
(* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h)))))))
(.f64 h (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 d (.f64 d d))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d (.f64 h (.f64 h h))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3)))))
(.f64 #s(literal -1/8 binary64) (.f64 (neg.f64 (.f64 M M)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 d (.f64 d d))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d (.f64 h (.f64 h h))))) (neg.f64 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 d (.f64 d d))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d (.f64 h (.f64 h h))))) (neg.f64 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 d (.f64 d d))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d (.f64 h (.f64 h h))))) (neg.f64 h))
(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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) l)
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) l)
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d h)))
(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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) l)
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) l)
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h)))))
(fma.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))
(/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 l (sqrt.f64 (/.f64 d h)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 l (sqrt.f64 (/.f64 d h)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) l)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l)
(/.f64 (fma.f64 l (sqrt.f64 (/.f64 d h)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) l)
(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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d h)))
(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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (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 D D) (.f64 (.f64 (.f64 M M) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (/.f64 #s(literal -1/8 binary64) l)) (sqrt.f64 (/.f64 d h)))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (*.f64 M M)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 d (fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M M)) (.f64 d d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (neg.f64 (.f64 M M))) (.f64 d d))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (neg.f64 (.f64 M M))) (.f64 d d))))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 d (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 (.f64 D D) (neg.f64 (.f64 M M))) (.f64 d d))))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 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 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 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 h (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (*.f64 h h))))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* d (sqrt (/ 1 (* h l))))
(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(* (sqrt (/ 1 (* h l))) (sqrt -1))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 (* h l))) (sqrt -1))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 (* h l))) (sqrt -1))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 (* h l))) (sqrt -1))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (sqrt.f64 #s(literal -1 binary64)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(* (sqrt (/ 1 (* h l))) (sqrt -1))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 (* h l))) (sqrt -1))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 (* h l))) (sqrt -1))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 (* h l))) (sqrt -1))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (sqrt.f64 #s(literal -1 binary64)))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(/ 1 (* h l))
(/.f64 #s(literal 1 binary64) (*.f64 h l))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* (pow D 2) (sqrt (/ h (pow l 3))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(* -1 (* (* (pow D 2) (pow (sqrt -1) 2)) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 D D) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(sqrt (/ 1 (* h l)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/.f64 (.f64 (.f64 M M) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) h)) (.f64 d (*.f64 d l)))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)
(* 1/2 (/ (* D M) d))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 D M)) d)

rewrite310.0ms (1.2%)

Memory

-15.9MiB live, 479.3MiB allocated

Rules

4 934×	`lower-*.f32`
4 888×	`lower-*.f64`
3 064×	`lower-pow.f64`
3 064×	`lower-pow.f32`
2 984×	`lower-/.f32`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	93	528
0	144	470
1	509	390
2	4446	379
0	8878	379

Stop Event

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

Counts

30 → 1 281

Calls

Call 1

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

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

eval582.0ms (2.3%)

Memory: 32.8MiB live, 472.4MiB allocated
Compiler: Compiled 86 702 to 5 533 computations (93.6% saved)

prune747.0ms (2.9%)

Memory

-38.0MiB live, 878.5MiB allocated

Pruning

80 alts after pruning (77 fresh and 3 done)

	Pruned	Kept	Total
New	2 863	27	2 890
Fresh	18	50	68
Picked	4	1	5
Done	0	2	2
Total	2 885	80	2 965

Accuracy

94.0%

Counts

2 965 → 80

Alt Table

Click to see full alt table

Status	Accuracy	Program
	24.2%	(/.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 M (.f64 D D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) d) (sqrt.f64 (.f64 h l)))
	22.9%	(/.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) (sqrt.f64 (.f64 (/.f64 d h) (neg.f64 d)))) (sqrt.f64 (neg.f64 l)))
	31.9%	(/.f64 (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	28.5%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h)))
	37.4%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (*.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	13.9%	(/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (neg.f64 l)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	11.5%	(/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (.f64 (.f64 (neg.f64 (/.f64 (.f64 M M) l)) (*.f64 D #s(literal -1/8 binary64))) D))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	10.9%	(/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) #s(approx ( (* -1/8 (* D D)) (neg (/ (* M M) l))) (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal 1/8 binary64)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	22.7%	(/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	44.4%	(.f64 (fma.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/2 binary64)) (.f64 d (.f64 d #s(literal 4 binary64)))) (.f64 (/.f64 h l) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	32.4%	(.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	25.8%	(.f64 (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (.f64 d d)))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 h l))))
	48.4%	(.f64 (.f64 (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (*.f64 d d)))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	38.9%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	60.7%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	38.9%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	53.8%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) d) (/.f64 (/.f64 (.f64 h #s(literal -1/2 binary64)) l) (*.f64 d #s(literal 4 binary64))) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	61.9%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 (.f64 d #s(literal 2 binary64)) l)) (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	51.4%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (/.f64 M d) (.f64 (.f64 D D) #s(literal 1/4 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	59.6%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 M D) (/.f64 (.f64 D #s(literal 1/4 binary64)) d)) (.f64 (/.f64 M d) (*.f64 #s(literal -1/2 binary64) (/.f64 h l))) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	53.7%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 #s(literal 1/4 binary64) (.f64 d d)))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l)))
	39.7%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	35.7%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	55.4%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 M D)) (.f64 (.f64 (.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h))) (sqrt.f64 (/.f64 d l)))
	35.7%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 d))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	39.7%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	60.7%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 (*.f64 d #s(literal 2 binary64)) l)) #s(literal 1 binary64)))
	41.1%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M (* D 1/2)) (* d 2)) l) (/ (/ (* M D) (* d 2)) (/ 1 h)))) (fma.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))) #s(literal 1 binary64))))
	39.5%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) #s(approx (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 h (.f64 M M)) (*.f64 d d)) l) l))) (sqrt.f64 (/.f64 d l)))
	21.5%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) #s(approx (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1) (/.f64 (.f64 (.f64 M M) (.f64 #s(literal -1/8 binary64) (.f64 h (.f64 D D)))) (.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l)))
	10.0%	(.f64 (sqrt.f64 (/.f64 d l)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (/.f64 (.f64 (.f64 (.f64 D (.f64 D #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (.f64 d (.f64 d d))))) (*.f64 M M)) (neg.f64 l))))
	25.7%	(.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (.f64 (sqrt.f64 d) (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (*.f64 d d)))) #s(literal 1 binary64))) (sqrt.f64 l)))
	27.3%	(.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (/.f64 M (.f64 d d))) (.f64 (.f64 D (*.f64 M D)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
	33.0%	(.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (fma.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (.f64 d d))))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
	29.9%	(.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (fma.f64 (.f64 D (.f64 M D)) (.f64 M (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (.f64 d d))))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
	32.1%	(.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 l d) (*.f64 d #s(literal 4 binary64))))) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l)))))
	29.8%	(.f64 (sqrt.f64 (/.f64 d h)) (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (*.f64 d d)))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 l)))))
	34.8%	(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (* (+ 1 (/ (* (* M (* D (* M D))) (* h -1/2)) (* (* d (* d 4)) l))) (sqrt (neg d))) (/ 1 (sqrt (neg l)))) (sqrt.f64 (/.f64 d l))))
	7.5%	(.f64 (sqrt.f64 (/.f64 d h)) #s(approx ( (* (+ 1 (/ (* (* M (* D (* M D))) (* h -1/2)) (* (* d (* d 4)) l))) (sqrt (neg d))) (/ 1 (sqrt (neg l)))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
	13.2%	(.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 d (.f64 d d)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) l)))) (sqrt.f64 (/.f64 d l)))
	22.8%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (/.f64 (.f64 M M) (neg.f64 d)) #s(literal -1/8 binary64)) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 h l)))))
	20.4%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d)))))
	19.3%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M M))) d) (/.f64 (neg.f64 d) (sqrt.f64 (*.f64 h l)))))
	20.9%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 (.f64 (.f64 D D) (/.f64 (sqrt.f64 (/.f64 h l)) (sqrt.f64 (.f64 l l)))) (/.f64 (.f64 M M) d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))) (neg.f64 d))))
	24.9%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))))
	14.0%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)))) (*.f64 l l)))
	14.1%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
	14.4%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (neg.f64 (/.f64 (*.f64 M M) d)))))
	26.5%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
	16.1%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (neg.f64 d) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (*.f64 l l))))
	18.1%	#s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))))
	16.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 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) d) (sqrt.f64 h)) (sqrt.f64 (.f64 l (*.f64 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 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (sqrt.f64 h)) (.f64 d (sqrt.f64 (.f64 l (.f64 l l))))))
	14.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
	15.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 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
	22.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓	24.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h 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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) d)))
	28.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
	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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 h l))) d))
	13.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 (/.f64 (/.f64 h l) l) l)) (.f64 (.f64 D D) (/.f64 (.f64 (*.f64 M M) #s(literal -1/8 binary64)) d))))
	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 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 D D) (/.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) d))))
	14.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (/.f64 #s(literal -1/8 binary64) d))) (*.f64 D D))))
	18.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 D (*.f64 M D))) (/.f64 #s(literal -1/8 binary64) d))))
	14.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal 1/8 binary64) d))))
	17.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d (.f64 h l))) (sqrt.f64 d)))
	2.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 l)))))
	24.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))))
	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 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) h))))
✓	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 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h 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 d (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) h)))))
	21.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h l))))))))
	21.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 (* h l)) (/ 1 (* h l))) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (*.f64 h h)))))))))
	23.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 (exp.f64 (.f64 (log.f64 (*.f64 h l)) #s(literal -1/2 binary64)))))
	14.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 D (.f64 (.f64 (.f64 D (.f64 M M)) (/.f64 #s(literal -1/8 binary64) d)) (sqrt.f64 (/.f64 h (.f64 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)))) (sqrt.f64 (/.f64 (/.f64 d l) (/.f64 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)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))))
	28.5%	#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 #s(literal 1 binary64)) (.f64 h (/.f64 l d)))))
	25.5%	#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 h l)) d)))
	28.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))

Compiler

Compiled 6 552 to 2 153 computations (67.1% saved)

regimes308.0ms (1.2%)

Memory

6.5MiB live, 557.5MiB allocated

Counts

153 → 3

Calls

Call 1

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

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

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

Calls

7 calls:

47.0ms	h
44.0ms	M
43.0ms	d
42.0ms	(*.f64 M D)
42.0ms	D

Results

Accuracy	Segments	Branch
79.3%	3	`d`
77.8%	2	`h`
80.3%	3	`l`
65.8%	1	`M`
65.8%	1	`D`
67.9%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
65.8%	1	`(*.f64 M D)`

Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes47.0ms (0.2%)

Memory

13.4MiB live, 91.9MiB allocated

Counts

133 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

38.0ms

Results

Accuracy	Segments	Branch
80.3%	3	`l`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes130.0ms (0.5%)

Memory

20.2MiB live, 251.9MiB allocated

Counts

128 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

3 calls:

39.0ms	h
38.0ms	l
37.0ms	d

Results

Accuracy	Segments	Branch
78.1%	3	`h`
77.0%	3	`d`
78.0%	3	`l`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes127.0ms (0.5%)

Memory

-29.5MiB live, 256.1MiB allocated

Counts

121 → 4

Calls

Call 1

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

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

Calls

3 calls:

43.0ms	l
37.0ms	d
36.0ms	h

Results

Accuracy	Segments	Branch
75.4%	3	`d`
73.1%	2	`l`
77.7%	4	`h`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes160.0ms (0.6%)

Memory

8.8MiB live, 207.0MiB allocated

Counts

120 → 4

Calls

Call 1

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

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

Calls

3 calls:

82.0ms	l
37.0ms	h
34.0ms	d

Results

Accuracy	Segments	Branch
71.7%	3	`l`
73.5%	4	`d`
73.6%	4	`h`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes71.0ms (0.3%)

Memory

-12.6MiB live, 67.5MiB allocated

Counts

119 → 4

Calls

Call 1

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

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

Calls

1 calls:

50.0ms

Results

Accuracy	Segments	Branch
73.6%	4	`h`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes101.0ms (0.4%)

Memory

20.5MiB live, 97.2MiB allocated

Counts

118 → 5

Calls

Call 1

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

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

Calls

2 calls:

49.0ms	h
44.0ms	d

Results

Accuracy	Segments	Branch
74.9%	5	`d`
71.7%	4	`h`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes419.0ms (1.6%)

Memory

-4.8MiB live, 276.8MiB allocated

Counts

114 → 5

Calls

Call 1

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

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

Calls

7 calls:

93.0ms	M
75.0ms	(*.f64 M D)
70.0ms	D
55.0ms	d
49.0ms	h

Results

Accuracy	Segments	Branch
64.5%	2	`D`
63.8%	2	`M`
64.6%	2	`(*.f64 M D)`
68.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))))`
68.1%	4	`h`
71.8%	5	`l`
71.5%	5	`d`

Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes153.0ms (0.6%)

Memory

7.8MiB live, 86.7MiB allocated

Counts

103 → 5

Calls

Call 1

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

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

Calls

2 calls:

75.0ms	l
72.0ms	d

Results

Accuracy	Segments	Branch
70.6%	5	`d`
69.6%	5	`l`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes138.0ms (0.5%)

Memory

5.2MiB live, 80.4MiB allocated

Counts

99 → 6

Calls

Call 1

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

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

Calls

2 calls:

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

64.0ms

Results

Accuracy	Segments	Branch
68.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))))`
71.4%	6	`d`

Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes88.0ms (0.3%)

Memory

9.4MiB live, 46.5MiB allocated

Counts

83 → 4

Calls

Call 1

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

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

Calls

2 calls:

63.0ms

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

Results

Accuracy	Segments	Branch
68.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))))`
70.7%	6	`d`

Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes308.0ms (1.2%)

Memory

-18.0MiB live, 258.6MiB allocated

Counts

82 → 4

Calls

Call 1

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

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

Calls

7 calls:

65.0ms	l
65.0ms	h
38.0ms	D
37.0ms	M
30.0ms	(*.f64 M D)

Results

Accuracy	Segments	Branch
59.1%	2	`M`
68.0%	6	`d`
59.8%	2	`D`
60.3%	2	`(*.f64 M D)`
64.3%	5	`l`
57.1%	2	`h`
65.3%	4	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes35.0ms (0.1%)

Memory

-32.6MiB live, 70.4MiB allocated

Counts

79 → 4

Calls

Call 1

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

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

Calls

1 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))))

Results

Accuracy	Segments	Branch
65.0%	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)

regimes52.0ms (0.2%)

Memory

23.1MiB live, 99.9MiB allocated

Counts

76 → 4

Calls

Call 1

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

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

Calls

2 calls:

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

22.0ms

Results

Accuracy	Segments	Branch
67.6%	7	`d`
63.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)

regimes24.0ms (0.1%)

Memory

13.3MiB live, 50.7MiB allocated

Counts

74 → 4

Calls

Call 1

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

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

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
63.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 40 to 22 computations (45% saved)

regimes37.0ms (0.1%)

Memory

-30.9MiB live, 48.6MiB allocated

Counts

69 → 4

Calls

Call 1

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

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

Calls

1 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))))

Results

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

regimes117.0ms (0.5%)

Memory

16.0MiB live, 210.7MiB allocated

Counts

66 → 5

Calls

Call 1

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

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

Calls

6 calls:

21.0ms	d
20.0ms	M
19.0ms	D
19.0ms	l
18.0ms	(*.f64 M D)

Results

Accuracy	Segments	Branch
52.9%	2	`M`
62.5%	5	`l`
63.2%	6	`d`
50.0%	4	`D`
49.9%	2	`(*.f64 M D)`
58.9%	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 72 to 48 computations (33.3% saved)

regimes21.0ms (0.1%)

Memory

0.7MiB live, 38.5MiB allocated

Counts

59 → 5

Calls

Call 1

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

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

Calls

1 calls:

18.0ms

Results

Accuracy	Segments	Branch
62.1%	5	`l`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes20.0ms (0.1%)

Memory

-7.8MiB live, 34.0MiB allocated

Counts

54 → 5

Calls

Call 1

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

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

Calls

1 calls:

17.0ms

Results

Accuracy	Segments	Branch
62.0%	5	`l`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes64.0ms (0.2%)

Memory

30.9MiB live, 69.6MiB allocated

Counts

53 → 5

Calls

Call 1

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

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

Calls

3 calls:

31.0ms	h
15.0ms	d
15.0ms	l

Results

Accuracy	Segments	Branch
61.0%	5	`d`
53.1%	4	`h`
57.9%	4	`l`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes46.0ms (0.2%)

Memory

-7.8MiB live, 66.8MiB allocated

Counts

50 → 4

Calls

Call 1

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

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

Calls

2 calls:

27.0ms

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
51.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))))`
58.5%	4	`d`

Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes27.0ms (0.1%)

Memory

-9.3MiB live, 35.1MiB allocated

Counts

47 → 4

Calls

Call 1

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

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

Calls

1 calls:

24.0ms

Results

Accuracy	Segments	Branch
58.2%	4	`d`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes49.0ms (0.2%)

Memory

22.3MiB live, 96.7MiB allocated

Counts

46 → 4

Calls

Call 1

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

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

Calls

3 calls:

17.0ms	M
16.0ms	d
13.0ms	l

Results

Accuracy	Segments	Branch
44.9%	3	`M`
54.0%	4	`l`
54.9%	4	`d`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes19.0ms (0.1%)

Memory

-5.0MiB live, 31.8MiB allocated

Counts

41 → 4

Calls

Call 1

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

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

Calls

1 calls:

16.0ms

Results

Accuracy	Segments	Branch
54.9%	4	`d`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes30.0ms (0.1%)

Memory

-31.6MiB live, 54.4MiB allocated

Counts

36 → 4

Calls

Call 1

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

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

Calls

2 calls:

14.0ms	d
10.0ms	l

Results

Accuracy	Segments	Branch
52.1%	4	`l`
53.7%	4	`d`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes81.0ms (0.3%)

Memory

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

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

Calls

5 calls:

38.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	h
10.0ms	d
10.0ms	l
9.0ms	(*.f64 M D)

Results

Accuracy	Segments	Branch
49.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))))`
49.7%	4	`l`
44.4%	3	`(*.f64 M D)`
46.7%	3	`h`
50.3%	4	`d`

Compiler

Compiled 66 to 43 computations (34.8% saved)

regimes34.0ms (0.1%)

Memory

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

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

Calls

3 calls:

12.0ms	d
11.0ms	l
10.0ms	D

Results

Accuracy	Segments	Branch
49.7%	4	`l`
40.7%	3	`D`
48.8%	4	`d`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes42.0ms (0.2%)

Memory

14.9MiB live, 90.1MiB allocated

Counts

31 → 3

Calls

Call 1

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

Outputs

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes22.0ms (0.1%)

Memory

-5.7MiB live, 38.2MiB allocated

Counts

29 → 3

Calls

Call 1

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

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

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

Calls

2 calls:

12.0ms

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

8.0ms

Results

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

Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes28.0ms (0.1%)

Memory

24.3MiB live, 61.6MiB allocated

Counts

28 → 3

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

10.0ms

8.0ms

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

Compiler

Compiled 52 to 32 computations (38.5% saved)

regimes62.0ms (0.2%)

Memory

-5.1MiB live, 33.1MiB allocated

Counts

25 → 3

Calls

Call 1

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

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

Calls

2 calls:

52.0ms

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

7.0ms

Results

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

Compiler

Compiled 46 to 27 computations (41.3% saved)

regimes62.0ms (0.2%)

Memory

-37.6MiB live, 52.1MiB allocated

Counts

24 → 2

Calls

Call 1

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

Outputs

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

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

Calls

4 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))))
15.0ms	h
7.0ms	l
7.0ms	d

Results

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

Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes20.0ms (0.1%)

Memory

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

Outputs

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
34.6%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
32.6%	3	`(*.f64 M D)`
30.0%	2	`M`
40.6%	2	`h`
39.6%	2	`d`
39.8%	2	`l`

Compiler

Compiled 72 to 48 computations (33.3% saved)

regimes13.0ms (0%)

Memory

-6.9MiB live, 31.7MiB allocated

Counts

6 → 2

Calls

Call 1

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

Outputs

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

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

Calls

4 calls:

4.0ms	h
3.0ms	d
3.0ms	D
3.0ms	l

Results

Accuracy	Segments	Branch
29.4%	2	`D`
32.5%	2	`d`
33.2%	2	`l`
32.4%	2	`h`

Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes11.0ms (0%)

Memory

-8.3MiB live, 29.8MiB allocated

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 78 to 53 computations (32.1% saved)

bsearch129.0ms (0.5%)

Memory

13.0MiB live, 166.4MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
74.0ms	-2.729352113352093e-308	2.4535172556239445e-308
46.0ms	-1.5319348758341465e+122	-1.1499224305617347e+120

Samples

72.0ms	183×	0	invalid
33.0ms	208×	0	valid

Compiler

Compiled 1 245 to 804 computations (35.4% saved)

Precisions

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

ival-pow: 52.0ms (57.2% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch64.0ms (0.2%)

Memory

6.4MiB live, 129.0MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	-2.729352113352093e-308	2.4535172556239445e-308
57.0ms	-6.776345123956269e+138	-1.1706434772167958e+132

Samples

26.0ms	144×	0	valid
21.0ms	134×	0	invalid

Compiler

Compiled 1 369 to 894 computations (34.7% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch386.0ms (1.5%)

Memory

-10.8MiB live, 221.9MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
106.0ms	1.349530785947014e+156	3.8807999982761106e+170
264.0ms	-9.504853002919101e-299	7.701803801616714e-302

Samples

235.0ms	320×	0	valid
113.0ms	345×	0	invalid

Compiler

Compiled 1 693 to 1 110 computations (34.4% saved)

Precisions

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

ival-mult: 85.0ms (59.2% of total)

ival-pow: 24.0ms (16.7% of total)

ival-div: 23.0ms (16% of total)

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

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

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

exact: 1.0ms (0.7% of total)

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

bsearch78.0ms (0.3%)

Memory

3.3MiB live, 128.0MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	1.349530785947014e+156	3.8807999982761106e+170
1.0ms	-9.504853002919101e-299	7.701803801616714e-302
68.0ms	-2.024066555684601e+156	-1.4339166370487457e+141

Samples

30.0ms	160×	0	valid
25.0ms	159×	0	invalid

Compiler

Compiled 2 503 to 1 630 computations (34.9% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch132.0ms (0.5%)

Memory

-7.4MiB live, 152.5MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
68.0ms	1.349530785947014e+156	3.8807999982761106e+170
53.0ms	-1.5691403095931698e-295	-9.504853002919101e-299
1.0ms	-2.024066555684601e+156	-1.4339166370487457e+141

Samples

65.0ms	208×	0	invalid
40.0ms	208×	0	valid

Compiler

Compiled 2 319 to 1 506 computations (35.1% saved)

Precisions

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

ival-div: 53.0ms (61.2% of total)

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

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

ival-pow2: 4.0ms (4.6% 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)

bsearch65.0ms (0.3%)

Memory

11.3MiB live, 93.3MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	1.349530785947014e+156	3.8807999982761106e+170
1.0ms	-1.5691403095931698e-295	-9.504853002919101e-299
56.0ms	-1.6973378632742138e+177	-1.3189710472757474e+163

Samples

28.0ms	160×	0	valid
16.0ms	118×	0	invalid

Compiler

Compiled 2 309 to 1 496 computations (35.2% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch219.0ms (0.9%)

Memory

-37.6MiB live, 299.1MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
50.0ms	3.353316689149417e+133	8.875408568616736e+133
49.0ms	1.8320672781335724e-270	6.400295469717833e-267
52.0ms	-4.042529007683111e-305	8.492523290686344e-306
38.0ms	-8.694067012267339e-212	-8.186009613819644e-213

Samples

85.0ms	395×	0	invalid
76.0ms	448×	0	valid

Compiler

Compiled 1 990 to 1 295 computations (34.9% saved)

Precisions

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

ival-div: 57.0ms (45.6% of total)

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

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

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

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

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

exact: 1.0ms (0.8% of total)

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

bsearch218.0ms (0.8%)

Memory

18.4MiB live, 330.5MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
71.0ms	6.221104162096296e+170	1.4186982749810674e+175
60.0ms	1.527577286548471e-89	1.179735618792313e-84
7.0ms	2.4535172556239445e-308	9.33381050762512e-304
55.0ms	-1.0898364436558923e+195	-9.243802227737863e+185

Samples

84.0ms	435×	0	invalid
80.0ms	432×	0	valid

Compiler

Compiled 1 920 to 1 254 computations (34.7% saved)

Precisions

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

ival-div: 53.0ms (41.9% of total)

ival-pow: 32.0ms (25.3% of total)

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

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

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

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

exact: 1.0ms (0.8% of total)

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

bsearch47.0ms (0.2%)

Memory

24.5MiB live, 61.7MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	3.353316689149417e+133	8.875408568616736e+133
1.0ms	1.8320672781335724e-270	6.400295469717833e-267
1.0ms	-4.042529007683111e-305	8.492523290686344e-306
40.0ms	-8.694067012267339e-212	-8.186009613819644e-213

Samples

22.0ms	78×	0	invalid
13.0ms	80×	0	valid

Compiler

Compiled 1 972 to 1 277 computations (35.2% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch128.0ms (0.5%)

Memory

-19.2MiB live, 210.5MiB allocated

Algorithm

5×	binary-search

Stop Event

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

Steps

Time	Left	Right
22.0ms	3.353316689149417e+133	8.875408568616736e+133
38.0ms	3.6054974693793635e-53	4.447060730273096e-52
50.0ms	6.400295469717833e-267	4.007826748899002e-263
1.0ms	-4.042529007683111e-305	8.492523290686344e-306
1.0ms	-8.694067012267339e-212	-8.186009613819644e-213

Samples

48.0ms	300×	0	invalid
42.0ms	272×	0	valid

Compiler

Compiled 2 385 to 1 527 computations (36% saved)

Precisions

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

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

ival-mult: 22.0ms (32.8% of total)

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

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

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

exact: 1.0ms (1.5% of total)

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

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

bsearch1.0ms (0%)

Memory

3.1MiB live, 3.1MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN
0.0ms	0.0	1.0833453240765748e-226
0.0ms	-1.605404311808602e-157	0.0

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

2.7MiB live, 2.8MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN
0.0ms	1.2209496674166494e-208	7.847729485275261e-204
0.0ms	-1.057858169145898e-62	-2.2030496027890783e-100

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

2.7MiB live, 2.7MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN
0.0ms	1.2209496674166494e-208	7.847729485275261e-204
0.0ms	-2.2030496027890783e-100	-9.099177495909899e-147

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

2.3MiB live, 2.3MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN
0.0ms	1.2209496674166494e-208	7.847729485275261e-204
0.0ms	-1.057858169145898e-62	-2.2030496027890783e-100

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

2.3MiB live, 2.3MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN
0.0ms	1.2209496674166494e-208	7.847729485275261e-204
0.0ms	-1.057858169145898e-62	-2.2030496027890783e-100

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

2.7MiB live, 2.7MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN
0.0ms	1.2209496674166494e-208	7.847729485275261e-204
0.0ms	-1.057858169145898e-62	-2.2030496027890783e-100

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch298.0ms (1.2%)

Memory

8.1MiB live, 451.0MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
70.0ms	3.996864124127683e-11	0.00019265432504625107
46.0ms	2.4535172556239445e-308	9.33381050762512e-304
94.0ms	-5.16666660500265e-90	-6.479905041691261e-94
63.0ms	-9.778313097836088e+97	-1.7047143650057348e+92

Samples

117.0ms	595×	0	invalid
117.0ms	528×	0	valid

Compiler

Compiled 1 995 to 1 317 computations (34% saved)

Precisions

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

ival-pow: 66.0ms (34.7% of total)

ival-mult: 62.0ms (32.6% of total)

ival-div: 42.0ms (22.1% of total)

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

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

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

exact: 1.0ms (0.5% of total)

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

bsearch47.0ms (0.2%)

Memory

-22.9MiB live, 99.5MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	3.996864124127683e-11	0.00019265432504625107
1.0ms	2.4535172556239445e-308	9.33381050762512e-304
40.0ms	-5.16666660500265e-90	-6.479905041691261e-94
1.0ms	-9.778313097836088e+97	-1.7047143650057348e+92

Samples

18.0ms	96×	0	valid
12.0ms	88×	0	invalid

Compiler

Compiled 1 961 to 1 266 computations (35.4% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch158.0ms (0.6%)

Memory

3.4MiB live, 137.7MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	3.996864124127683e-11	0.00019265432504625107
1.0ms	2.4535172556239445e-308	9.33381050762512e-304
79.0ms	-5.16666660500265e-90	-6.479905041691261e-94
70.0ms	-9.778313097836088e+97	-1.7047143650057348e+92

Samples

88.0ms	198×	0	invalid
27.0ms	176×	0	valid

Compiler

Compiled 1 944 to 1 266 computations (34.9% saved)

Precisions

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

ival-mult: 21.0ms (41% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch223.0ms (0.9%)

Memory

9.3MiB live, 473.1MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
42.0ms	8.634106982657964e+97	9.136403948140423e+99
43.0ms	1.2129923784380534e-286	1.2089094606836293e-285
50.0ms	-1.3738860764590181e-121	-9.291222160269971e-125
65.0ms	-1.1287202622578427e+86	-7.600736763920947e+80

Samples

89.0ms	480×	0	valid
74.0ms	515×	0	invalid

Compiler

Compiled 1 741 to 1 137 computations (34.7% saved)

Precisions

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

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

ival-div: 40.0ms (31.5% of total)

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

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

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

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

exact: 1.0ms (0.8% of total)

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

bsearch47.0ms (0.2%)

Memory

2.5MiB live, 117.5MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	8.634106982657964e+97	9.136403948140423e+99
1.0ms	1.2129923784380534e-286	1.2089094606836293e-285
41.0ms	-1.3738860764590181e-121	-9.291222160269971e-125

Samples

22.0ms	112×	0	valid
12.0ms	103×	0	invalid

Compiler

Compiled 1 127 to 749 computations (33.5% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch63.0ms (0.2%)

Memory

-5.9MiB live, 124.5MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
56.0ms	5.527809463946159e+66	7.576639026452339e+70
1.0ms	1.2129923784380534e-286	1.2089094606836293e-285
1.0ms	-1.3738860764590181e-121	-9.291222160269971e-125

Samples

28.0ms	128×	0	valid
19.0ms	143×	0	invalid

Compiler

Compiled 1 161 to 768 computations (33.9% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch84.0ms (0.3%)

Memory

-1.5MiB live, 190.6MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
24.0ms	4.523716684076035e-26	8.287488548221641e-26
49.0ms	-1.131567678885125e-302	-4.042529007683111e-305
1.0ms	-1.3738860764590181e-121	-9.291222160269971e-125

Samples

33.0ms	192×	0	valid
26.0ms	195×	0	invalid

Compiler

Compiled 1 035 to 670 computations (35.3% saved)

Precisions

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

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

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

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

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

ival-sub: 2.0ms (4.5% 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

8.9MiB live, 8.9MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
0.0ms	4.523716684076035e-26	8.287488548221641e-26
1.0ms	-1.131567678885125e-302	-4.042529007683111e-305
1.0ms	-1.3738860764590181e-121	-9.291222160269971e-125

Compiler

Compiled 1 023 to 658 computations (35.7% saved)

bsearch111.0ms (0.4%)

Memory

0.0MiB live, 191.4MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
31.0ms	4.523716684076035e-26	8.287488548221641e-26
42.0ms	-1.3137698156763909e-300	-1.131567678885125e-302
31.0ms	-1.3738860764590181e-121	-9.291222160269971e-125

Samples

29.0ms	176×	0	valid
25.0ms	182×	0	invalid

Compiler

Compiled 953 to 624 computations (34.5% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch66.0ms (0.3%)

Memory

10.2MiB live, 87.8MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
60.0ms	8.287488548221641e-26	1.8227797525965479e-25
1.0ms	-1.3137698156763909e-300	-1.131567678885125e-302
1.0ms	-1.3738860764590181e-121	-9.291222160269971e-125

Samples

42.0ms	80×	0	valid
13.0ms	96×	0	invalid

Compiler

Compiled 994 to 651 computations (34.5% saved)

Precisions

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

ival-sub: 31.0ms (63.6% of total)

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

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

ival-pow: 4.0ms (8.2% of total)

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

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

exact: 0.0ms (0% of total)

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

bsearch151.0ms (0.6%)

Memory

4.3MiB live, 364.9MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
70.0ms	2.2774343436490675e-216	4.610215021465107e-209
1.0ms	2.4535172556239445e-308	9.33381050762512e-304
68.0ms	-6.813910730049096e-78	-2.1195744346510872e-82

Samples

53.0ms	320×	0	invalid
47.0ms	272×	0	valid

Compiler

Compiled 1 100 to 745 computations (32.3% saved)

Precisions

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

ival-mult: 25.0ms (31.7% of total)

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

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

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

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

exact: 1.0ms (1.3% of total)

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

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

bsearch62.0ms (0.2%)

Memory

-7.7MiB live, 116.5MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	-9.504853002919101e-299	7.701803801616714e-302
57.0ms	-1.6768926709515806e-168	-1.2633586381493829e-169

Samples

34.0ms	96×	0	valid
16.0ms	114×	0	invalid

Compiler

Compiled 633 to 438 computations (30.8% saved)

Precisions

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

ival-pow2: 16.0ms (38.1% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch1.0ms (0%)

Memory

1.3MiB live, 1.3MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN
0.0ms	0.0	1.0833453240765748e-226

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch0.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN
0.0ms	0.0	1.0833453240765748e-226

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN
0.0ms	0.0	1.0833453240765748e-226

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch61.0ms (0.2%)

Memory

-2.5MiB live, 116.8MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
57.0ms	8.441135489862352e-252	6.862108880300437e-251

Samples

37.0ms	96×	0	valid
14.0ms	99×	0	invalid

Compiler

Compiled 223 to 162 computations (27.4% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch75.0ms (0.3%)

Memory

5.8MiB live, 83.5MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
71.0ms	-3.211115942802015e-236	-2.669755873389367e-237

Samples

55.0ms	96×	0	valid
11.0ms	80×	0	invalid

Compiler

Compiled 217 to 156 computations (28.1% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch40.0ms (0.2%)

Memory

-10.2MiB live, 41.0MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
37.0ms	-5.16666660500265e-90	-6.479905041691261e-94

Samples

23.0ms	64×	0	valid
9.0ms	66×	0	invalid

Compiler

Compiled 267 to 182 computations (31.8% saved)

Precisions

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

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

ival-mult: 4.0ms (14.3% of total)

ival-pow: 4.0ms (14.3% of total)

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

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

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

exact: 0.0ms (0% of total)

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

simplify92.0ms (0.4%)

Memory

-10.7MiB live, 148.5MiB allocated

Algorithm

1×	egg-herbie

Rules

354×	`*-commutative_binary64`
120×	`+-commutative_binary64`
118×	`sub-neg_binary64`
114×	`neg-sub0_binary64`
114×	`neg-mul-1_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	490	6981
1	653	6981
2	758	6981
3	884	6981
4	1004	6981
5	1069	6981
6	1091	6981
7	1095	6981

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 l #s(literal -115000000000000002574083418929235098064906999700090728784395157843136215624530587125661896704979347720588674004840943190016 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.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 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))))
(if (<=.f64 l #s(literal -43999999999999998966068866561584501405746147796931515246024229639330295986113689524914340751452459313634239061577868986993488494067712000 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))))
(if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal 3449999999999999897516906523075110048689712604864451184329394805015255147272021119200176674395171425257226758683679533684659534304691330890756783205641956978171087683584 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -18000000000000000313738324996766487190640861151049847533628449705655794149766707501027723687858848749689276794139399387371241787640475023333933449216 binary64)) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal 3449999999999999897516906523075110048689712604864451184329394805015255147272021119200176674395171425257226758683679533684659534304691330890756783205641956978171087683584 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h)))))
(if (<=.f64 h #s(literal -18000000000000000313738324996766487190640861151049847533628449705655794149766707501027723687858848749689276794139399387371241787640475023333933449216 binary64)) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal -7540071506325551/11781361728633673532894774498354952494238773929196300355071513798753168641589311119865182769801300280680127783231251635087526446289021607771691249214388576215221396663491984443067742263787264024212477244347842938066577043117995647400274369612403653814737339068225047641453182709824206687753689912418253153056587776 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal 1820000000000000038843819767300554260958496247597626127690750056134686537460570782874708084447809973373321780103429512904609989044991413172095972871700304197739362648064 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h)))))
(if (<=.f64 h #s(literal -329999999999999996395174272257171063903843543983754288386316781546603813737189205734355819626579504040148974226722270317681290943871331332033748048218619000976476049416126464 binary64)) (/.f64 (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal -7540071506325551/11781361728633673532894774498354952494238773929196300355071513798753168641589311119865182769801300280680127783231251635087526446289021607771691249214388576215221396663491984443067742263787264024212477244347842938066577043117995647400274369612403653814737339068225047641453182709824206687753689912418253153056587776 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal 1820000000000000038843819767300554260958496247597626127690750056134686537460570782874708084447809973373321780103429512904609989044991413172095972871700304197739362648064 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -3411294636402925/379032737378102767370356320425415662904513187772631008578870126471203845870697482014374611530431269030880793627229265919475483409207718357286202948008100864063587640630090308972232735749901964068667724412528434753635948938919936 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 d #s(literal 7851449276762695/594806763391113225119224999259960224052504080663757783622308743726376262864161749418067325798462540235919489516077189220181834098217962283116332232440957850313188336178983949577074563933719094748095678312940574882427099482751152035262839576139463233204818042181657565129506139525873664 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (if (<=.f64 d #s(literal 85000000000000004421578047124779763934195045467468239789173422955440838060750698437523923226487834188099337164754413118098999011704832 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 l #s(literal -34999999999999998582284582336484697668021648692984764323887618324512917412213514274226636931591472106029773939151645190501928819814501518578375731322118266792005704183593736457102884104830976 binary64)) (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (fma.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (.f64 d d))))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (if (<=.f64 l #s(literal 8096090132292425/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 l #s(literal 6092105698723627/35835915874844867368919076489095108449946327955754392558399825615420669938882575126094039892345713852416 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h)) (if (<=.f64 l #s(literal 80000000000000006614973028568464189411490215721217882690612274470661371154490853834981853312977391173737541140186125506791440534675198181595804617440852401832631117438517248 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 (.f64 d #s(literal 2 binary64)) l)) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -3316536452058399/47379092172262845921294540053176957863064148471578876072358765808900480733837185251796826441303908628860099203403658239934435426150964794660775368501012608007948455078761288621529091968737745508583465551566054344204493617364992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 d #s(literal 7851449276762695/594806763391113225119224999259960224052504080663757783622308743726376262864161749418067325798462540235919489516077189220181834098217962283116332232440957850313188336178983949577074563933719094748095678312940574882427099482751152035262839576139463233204818042181657565129506139525873664 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (if (<=.f64 d #s(literal 85000000000000004421578047124779763934195045467468239789173422955440838060750698437523923226487834188099337164754413118098999011704832 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -3316536452058399/47379092172262845921294540053176957863064148471578876072358765808900480733837185251796826441303908628860099203403658239934435426150964794660775368501012608007948455078761288621529091968737745508583465551566054344204493617364992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 d #s(literal 3721172683568671/4538015467766671944574165338592225830478699345884382504442663144885072806275648112625635725391102144133907238129251016389326737199538896813326509341743147661691195191795226666084858428449394948944821764472508048114220424520501343042471615418544488778723282182172070046459244838912 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (if (<=.f64 d #s(literal 1051437920018875/26959946667150639794667015087019630673637144422540572481103610249216 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) (if (<=.f64 d #s(literal 69999999999999996521125272024886856173971732288433749873145228382724680524314849428381037831258745904044987370594172652672047055372288 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64))) (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 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 -6183260036827613/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 (.f64 d #s(literal 2 binary64)) l)) #s(literal 1 binary64))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 h l)) d))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (neg.f64 l)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -578960446186581/57896044618658097711785492504343953926634992332820282019728792003956564819968 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 M D)) (.f64 (.f64 (.f64 d #s(literal 2 binary64)) l) (.f64 d #s(literal 2 binary64)))) h))) (sqrt.f64 (/.f64 d l))) (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 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (neg.f64 l)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -492525077454931/2462625387274654950767440006258975862817483704404090416746768337765357610718575663213391640930307227550414249394176 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 #s(literal 1/4 binary64) (.f64 d d)))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (neg.f64 l)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -578960446186581/57896044618658097711785492504343953926634992332820282019728792003956564819968 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (/.f64 (.f64 h #s(literal 1/2 binary64)) (.f64 (.f64 d d) l))))) (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 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (neg.f64 l)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -578960446186581/57896044618658097711785492504343953926634992332820282019728792003956564819968 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (/.f64 (.f64 h #s(literal 1/2 binary64)) (.f64 (.f64 d d) l))))) (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 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 M (.f64 D D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) d) (sqrt.f64 (.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 -578960446186581/57896044618658097711785492504343953926634992332820282019728792003956564819968 binary64)) (.f64 (.f64 (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 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 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 M (.f64 D D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) d) (sqrt.f64 (.f64 h l))))))
(if (<=.f64 l #s(literal -96000000000000000992443601174876637993411737837407002015238863815040883868587245505610633432793088 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal -5871356456934583/4697085165547666455778961193578674054751365097816639741414581943064418050229216886927397996769537406063869952 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 l #s(literal 5060056332682765/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 l #s(literal 3412647653636267/18446744073709551616 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 l #s(literal -96000000000000000992443601174876637993411737837407002015238863815040883868587245505610633432793088 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal -2348542582773833/73391955711682288371546268649666782105490079653384995959602842860381532034831513858240593699524021969747968 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (/.f64 (.f64 M M) (neg.f64 d)) #s(literal -1/8 binary64)) (/.f64 (neg.f64 d) (sqrt.f64 (.f64 h l))))) (if (<=.f64 l #s(literal 5060056332682765/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 l #s(literal 3412647653636267/18446744073709551616 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 l #s(literal -194999999999999985415947151824818395000981181636734502998668940458070534661428599058845333979136 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal -6458492102628041/293567822846729153486185074598667128421960318613539983838411371441526128139326055432962374798096087878991872 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M M))) d) (/.f64 (neg.f64 d) (sqrt.f64 (.f64 h l))))) (if (<=.f64 l #s(literal 5060056332682765/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 l #s(literal 3412647653636267/18446744073709551616 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -1499999999999999987235111512055860810821282557259208096610092736733707476955824128 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -4525239750366505/47634102635436893179040485073748265163400240214004076398607741693502376385799646303105256699577209032590132615988260237052123652332890095616 binary64)) (.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (if (<=.f64 d #s(literal 3107374960840175/21430172143725346418968500981200036211228096234110672148875007767407021022498722449863967576313917162551893458351062936503742905713846280871969155149397149607869135549648461970842149210124742283755908364306092949967163882534797535118331087892154125829142392955373084335320859663305248773674411336138752 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 d #s(literal 430000000000000012666249853873951972897900488720203819687817602139575630958763614831692065007468544 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -8001040677046041/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal 3107374960840175/21430172143725346418968500981200036211228096234110672148875007767407021022498722449863967576313917162551893458351062936503742905713846280871969155149397149607869135549648461970842149210124742283755908364306092949967163882534797535118331087892154125829142392955373084335320859663305248773674411336138752 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 d #s(literal 430000000000000012666249853873951972897900488720203819687817602139575630958763614831692065007468544 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -8001040677046041/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal 3107374960840175/21430172143725346418968500981200036211228096234110672148875007767407021022498722449863967576313917162551893458351062936503742905713846280871969155149397149607869135549648461970842149210124742283755908364306092949967163882534797535118331087892154125829142392955373084335320859663305248773674411336138752 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 d #s(literal 75000000000000003141114417315859346924357539998025371235757078385524736 binary64)) (.f64 (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (.f64 d d)))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -8001040677046041/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -4051998235156121/98829225247710262867429368515096341332791332892647518728955741224331220492185227974590031104217345944915565363435943316108305047551656971126471386689813725547615929822542168634993607295943953291620980311754270053008792716515963231747120779125566189619536160406425180445475300105093018814544105228831057745755716670455808 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 d #s(literal 2439144006089287/43556142965880123323311949751266331066368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (sqrt.f64 h)) (.f64 d (sqrt.f64 (.f64 l (.f64 l l)))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -8001040677046041/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -4051998235156121/98829225247710262867429368515096341332791332892647518728955741224331220492185227974590031104217345944915565363435943316108305047551656971126471386689813725547615929822542168634993607295943953291620980311754270053008792716515963231747120779125566189619536160406425180445475300105093018814544105228831057745755716670455808 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 d #s(literal 2439144006089287/43556142965880123323311949751266331066368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 #s(literal -1/8 binary64) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2604989987875455/93035356709837681990313447409664580397266094167976711716030745495121828878514934185752454491361736391777602765602070775492429008462675968 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -8879188205848969/772103322247736428651791941524190166662432288223808740069966728315087660095197093551484618001698015194652854401843307157096133183997320086925557708514169730840749451738610692460887556999562135090788908685580234789131193097780962748024381086918485856402626253175196722230275782071039209488625822100242638638716536487936 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 2439144006089287/43556142965880123323311949751266331066368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 #s(literal -1/8 binary64) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2604989987875455/93035356709837681990313447409664580397266094167976711716030745495121828878514934185752454491361736391777602765602070775492429008462675968 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -8879188205848969/772103322247736428651791941524190166662432288223808740069966728315087660095197093551484618001698015194652854401843307157096133183997320086925557708514169730840749451738610692460887556999562135090788908685580234789131193097780962748024381086918485856402626253175196722230275782071039209488625822100242638638716536487936 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 5444517870735015/43556142965880123323311949751266331066368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 D (.f64 (.f64 (.f64 D (.f64 M M)) (/.f64 #s(literal -1/8 binary64) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -7347795403567931/34175792574734561318320347298712833833643272357706444319152665725155515612490248800367393390985216 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal 5060056332682765/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h l)))))))) (if (<=.f64 l #s(literal 7374460938428367/194064761537588616893622436057812819407110752139587076392381504753256369085797110791359801103580809743810966337141384150771447505514351798930535909380147642400556872002606238193783160703949805603157874899214558593861605856727007232 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 D (.f64 (.f64 (.f64 D (.f64 M M)) (/.f64 #s(literal -1/8 binary64) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 h #s(literal -2082060931841727/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 (* h l)) (/ 1 (* h l))) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (.f64 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 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 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h l)))))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h l)))))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 (* h l)) (/ 1 (* h l))) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (.f64 h 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 +inf.0 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))))
(if (<=.f64 l #s(literal 44336241474093/4030567406735727282351225165683873035574701889313671280883489296162978382543372035785043761349923613698382530160958318167742519832631573007587730243400112738864034149162331269597866193210040596412843573823632724030670381872189039145190406026970187961498554846937088 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 h #s(literal -5132091582190713/1832889850782397517082802171755189663406191307018921761884252780947908096342585866198098193012776216027479008590015982084761399088452696108828481666660133095712823955710669574545075280734654641679682560526831695838459555430831205351382962374814354898944 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(if (<=.f64 l #s(literal -3053105357605983/4697085165547666455778961193578674054751365097816639741414581943064418050229216886927397996769537406063869952 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (.f64 (/.f64 d (.f64 h l)) d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))

Outputs
(if (<=.f64 l #s(literal -115000000000000002574083418929235098064906999700090728784395157843136215624530587125661896704979347720588674004840943190016 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.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 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))))
(if (<=.f64 l #s(literal -115000000000000002574083418929235098064906999700090728784395157843136215624530587125661896704979347720588674004840943190016 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h))))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (.f64 (.f64 (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 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (*.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -43999999999999998966068866561584501405746147796931515246024229639330295986113689524914340751452459313634239061577868986993488494067712000 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))))
(if (<=.f64 l #s(literal -43999999999999998966068866561584501405746147796931515246024229639330295986113689524914340751452459313634239061577868986993488494067712000 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h))))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l)))) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))))
(if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal 3449999999999999897516906523075110048689712604864451184329394805015255147272021119200176674395171425257226758683679533684659534304691330890756783205641956978171087683584 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h))))) (if (<=.f64 h #s(literal 3449999999999999897516906523075110048689712604864451184329394805015255147272021119200176674395171425257226758683679533684659534304691330890756783205641956978171087683584 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))) (/.f64 (.f64 (sqrt.f64 d) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -18000000000000000313738324996766487190640861151049847533628449705655794149766707501027723687858848749689276794139399387371241787640475023333933449216 binary64)) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal 3449999999999999897516906523075110048689712604864451184329394805015255147272021119200176674395171425257226758683679533684659534304691330890756783205641956978171087683584 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h)))))
(if (<=.f64 h #s(literal -18000000000000000313738324996766487190640861151049847533628449705655794149766707501027723687858848749689276794139399387371241787640475023333933449216 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 h (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal 3449999999999999897516906523075110048689712604864451184329394805015255147272021119200176674395171425257226758683679533684659534304691330890756783205641956978171087683584 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))) (/.f64 (.f64 (sqrt.f64 d) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))) (sqrt.f64 h)))))
(if (<=.f64 h #s(literal -18000000000000000313738324996766487190640861151049847533628449705655794149766707501027723687858848749689276794139399387371241787640475023333933449216 binary64)) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal -7540071506325551/11781361728633673532894774498354952494238773929196300355071513798753168641589311119865182769801300280680127783231251635087526446289021607771691249214388576215221396663491984443067742263787264024212477244347842938066577043117995647400274369612403653814737339068225047641453182709824206687753689912418253153056587776 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal 1820000000000000038843819767300554260958496247597626127690750056134686537460570782874708084447809973373321780103429512904609989044991413172095972871700304197739362648064 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h)))))
(if (<=.f64 h #s(literal -18000000000000000313738324996766487190640861151049847533628449705655794149766707501027723687858848749689276794139399387371241787640475023333933449216 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal -7540071506325551/11781361728633673532894774498354952494238773929196300355071513798753168641589311119865182769801300280680127783231251635087526446289021607771691249214388576215221396663491984443067742263787264024212477244347842938066577043117995647400274369612403653814737339068225047641453182709824206687753689912418253153056587776 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 h (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal 1820000000000000038843819767300554260958496247597626127690750056134686537460570782874708084447809973373321780103429512904609989044991413172095972871700304197739362648064 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) (/.f64 (.f64 (sqrt.f64 d) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))) (sqrt.f64 h)))))
(if (<=.f64 h #s(literal -329999999999999996395174272257171063903843543983754288386316781546603813737189205734355819626579504040148974226722270317681290943871331332033748048218619000976476049416126464 binary64)) (/.f64 (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal -7540071506325551/11781361728633673532894774498354952494238773929196300355071513798753168641589311119865182769801300280680127783231251635087526446289021607771691249214388576215221396663491984443067742263787264024212477244347842938066577043117995647400274369612403653814737339068225047641453182709824206687753689912418253153056587776 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal 1820000000000000038843819767300554260958496247597626127690750056134686537460570782874708084447809973373321780103429512904609989044991413172095972871700304197739362648064 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h)))))
(if (<=.f64 h #s(literal -329999999999999996395174272257171063903843543983754288386316781546603813737189205734355819626579504040148974226722270317681290943871331332033748048218619000976476049416126464 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal -7540071506325551/11781361728633673532894774498354952494238773929196300355071513798753168641589311119865182769801300280680127783231251635087526446289021607771691249214388576215221396663491984443067742263787264024212477244347842938066577043117995647400274369612403653814737339068225047641453182709824206687753689912418253153056587776 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 h (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal 1820000000000000038843819767300554260958496247597626127690750056134686537460570782874708084447809973373321780103429512904609989044991413172095972871700304197739362648064 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) (/.f64 (.f64 (sqrt.f64 d) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -3411294636402925/379032737378102767370356320425415662904513187772631008578870126471203845870697482014374611530431269030880793627229265919475483409207718357286202948008100864063587640630090308972232735749901964068667724412528434753635948938919936 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 d #s(literal 7851449276762695/594806763391113225119224999259960224052504080663757783622308743726376262864161749418067325798462540235919489516077189220181834098217962283116332232440957850313188336178983949577074563933719094748095678312940574882427099482751152035262839576139463233204818042181657565129506139525873664 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (if (<=.f64 d #s(literal 85000000000000004421578047124779763934195045467468239789173422955440838060750698437523923226487834188099337164754413118098999011704832 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -3411294636402925/379032737378102767370356320425415662904513187772631008578870126471203845870697482014374611530431269030880793627229265919475483409207718357286202948008100864063587640630090308972232735749901964068667724412528434753635948938919936 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (/.f64 (.f64 h (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 D))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))) (if (<=.f64 d #s(literal 7851449276762695/594806763391113225119224999259960224052504080663757783622308743726376262864161749418067325798462540235919489516077189220181834098217962283116332232440957850313188336178983949577074563933719094748095678312940574882427099482751152035262839576139463233204818042181657565129506139525873664 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (if (<=.f64 d #s(literal 85000000000000004421578047124779763934195045467468239789173422955440838060750698437523923226487834188099337164754413118098999011704832 binary64)) (/.f64 (.f64 (sqrt.f64 d) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))) (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 (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 l #s(literal -34999999999999998582284582336484697668021648692984764323887618324512917412213514274226636931591472106029773939151645190501928819814501518578375731322118266792005704183593736457102884104830976 binary64)) (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (fma.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (.f64 d d))))) #s(literal 1 binary64)) (sqrt.f64 (neg.f64 d))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (if (<=.f64 l #s(literal 8096090132292425/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 l #s(literal 6092105698723627/35835915874844867368919076489095108449946327955754392558399825615420669938882575126094039892345713852416 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h)) (if (<=.f64 l #s(literal 80000000000000006614973028568464189411490215721217882690612274470661371154490853834981853312977391173737541140186125506791440534675198181595804617440852401832631117438517248 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 (.f64 d #s(literal 2 binary64)) l)) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 l #s(literal -34999999999999998582284582336484697668021648692984764323887618324512917412213514274226636931591472106029773939151645190501928819814501518578375731322118266792005704183593736457102884104830976 binary64)) (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (fma.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 (.f64 d d) #s(literal 4 binary64))))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 l))))) (if (<=.f64 l #s(literal 8096090132292425/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))) (if (<=.f64 l #s(literal 6092105698723627/35835915874844867368919076489095108449946327955754392558399825615420669938882575126094039892345713852416 binary64)) (/.f64 (.f64 (sqrt.f64 d) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))) (sqrt.f64 h)) (if (<=.f64 l #s(literal 80000000000000006614973028568464189411490215721217882690612274470661371154490853834981853312977391173737541140186125506791440534675198181595804617440852401832631117438517248 binary64)) (.f64 (fma.f64 (/.f64 (.f64 h (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)) (.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)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 d #s(literal -3316536452058399/47379092172262845921294540053176957863064148471578876072358765808900480733837185251796826441303908628860099203403658239934435426150964794660775368501012608007948455078761288621529091968737745508583465551566054344204493617364992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 d #s(literal 7851449276762695/594806763391113225119224999259960224052504080663757783622308743726376262864161749418067325798462540235919489516077189220181834098217962283116332232440957850313188336178983949577074563933719094748095678312940574882427099482751152035262839576139463233204818042181657565129506139525873664 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (if (<=.f64 d #s(literal 85000000000000004421578047124779763934195045467468239789173422955440838060750698437523923226487834188099337164754413118098999011704832 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 d)) (sqrt.f64 h)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -3316536452058399/47379092172262845921294540053176957863064148471578876072358765808900480733837185251796826441303908628860099203403658239934435426150964794660775368501012608007948455078761288621529091968737745508583465551566054344204493617364992 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64))))) h #s(literal 1 binary64)))) (if (<=.f64 d #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 D))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))) (if (<=.f64 d #s(literal 7851449276762695/594806763391113225119224999259960224052504080663757783622308743726376262864161749418067325798462540235919489516077189220181834098217962283116332232440957850313188336178983949577074563933719094748095678312940574882427099482751152035262839576139463233204818042181657565129506139525873664 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (if (<=.f64 d #s(literal 85000000000000004421578047124779763934195045467468239789173422955440838060750698437523923226487834188099337164754413118098999011704832 binary64)) (/.f64 (.f64 (sqrt.f64 d) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))) (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 (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 d #s(literal -3316536452058399/47379092172262845921294540053176957863064148471578876072358765808900480733837185251796826441303908628860099203403658239934435426150964794660775368501012608007948455078761288621529091968737745508583465551566054344204493617364992 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 d #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 d #s(literal 3721172683568671/4538015467766671944574165338592225830478699345884382504442663144885072806275648112625635725391102144133907238129251016389326737199538896813326509341743147661691195191795226666084858428449394948944821764472508048114220424520501343042471615418544488778723282182172070046459244838912 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (if (<=.f64 d #s(literal 1051437920018875/26959946667150639794667015087019630673637144422540572481103610249216 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) (if (<=.f64 d #s(literal 69999999999999996521125272024886856173971732288433749873145228382724680524314849428381037831258745904044987370594172652672047055372288 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))) h #s(literal 1 binary64))) (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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))))
(if (<=.f64 d #s(literal -3316536452058399/47379092172262845921294540053176957863064148471578876072358765808900480733837185251796826441303908628860099203403658239934435426150964794660775368501012608007948455078761288621529091968737745508583465551566054344204493617364992 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64))))) h #s(literal 1 binary64)))) (if (<=.f64 d #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 D))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))) (if (<=.f64 d #s(literal 3721172683568671/4538015467766671944574165338592225830478699345884382504442663144885072806275648112625635725391102144133907238129251016389326737199538896813326509341743147661691195191795226666084858428449394948944821764472508048114220424520501343042471615418544488778723282182172070046459244838912 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))) (if (<=.f64 d #s(literal 1051437920018875/26959946667150639794667015087019630673637144422540572481103610249216 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 l (.f64 d (.f64 d #s(literal 4 binary64))))))) (if (<=.f64 d #s(literal 69999999999999996521125272024886856173971732288433749873145228382724680524314849428381037831258745904044987370594172652672047055372288 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64))))) h #s(literal 1 binary64)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -6183260036827613/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 M D) h) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 (.f64 d #s(literal 2 binary64)) l)) #s(literal 1 binary64))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 h l)) d))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (neg.f64 l)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -6183260036827613/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) (.f64 (fma.f64 (/.f64 (.f64 h (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 (.f64 (.f64 M D) #s(literal -1/2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64)))) #s(literal 1 binary64)) (.f64 (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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 l h)) d))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (neg.f64 #s(literal -1/8 binary64))) l) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) (sqrt.f64 (neg.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -578960446186581/57896044618658097711785492504343953926634992332820282019728792003956564819968 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 M D)) (.f64 (.f64 (.f64 d #s(literal 2 binary64)) l) (.f64 d #s(literal 2 binary64)))) h))) (sqrt.f64 (/.f64 d l))) (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 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (neg.f64 l)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -578960446186581/57896044618658097711785492504343953926634992332820282019728792003956564819968 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (.f64 h (/.f64 (.f64 (.f64 M (.f64 D #s(literal 1/2 binary64))) (.f64 M D)) (.f64 (.f64 d #s(literal 2 binary64)) (.f64 l (.f64 d #s(literal 2 binary64))))))))) (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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 D))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (neg.f64 #s(literal -1/8 binary64))) l) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) (sqrt.f64 (neg.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -492525077454931/2462625387274654950767440006258975862817483704404090416746768337765357610718575663213391640930307227550414249394176 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 #s(literal 1/4 binary64) (.f64 d d)))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (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 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (neg.f64 l)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -492525077454931/2462625387274654950767440006258975862817483704404090416746768337765357610718575663213391640930307227550414249394176 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (/.f64 #s(literal 1/4 binary64) (.f64 d d)))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)))) (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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 D))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (neg.f64 #s(literal -1/8 binary64))) l) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) (sqrt.f64 (neg.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -578960446186581/57896044618658097711785492504343953926634992332820282019728792003956564819968 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (/.f64 (.f64 h #s(literal 1/2 binary64)) (.f64 (.f64 d d) l))))) (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 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (neg.f64 l)) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d)))))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -578960446186581/57896044618658097711785492504343953926634992332820282019728792003956564819968 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (/.f64 (.f64 h #s(literal 1/2 binary64)) (.f64 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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 D))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (neg.f64 #s(literal -1/8 binary64))) l) (sqrt.f64 (/.f64 h (.f64 d (*.f64 d d))))))) (sqrt.f64 (neg.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -578960446186581/57896044618658097711785492504343953926634992332820282019728792003956564819968 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (/.f64 (.f64 h #s(literal 1/2 binary64)) (.f64 (.f64 d d) l))))) (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 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 M (.f64 D D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) d) (sqrt.f64 (.f64 h 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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -578960446186581/57896044618658097711785492504343953926634992332820282019728792003956564819968 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (.f64 (sqrt.f64 (/.f64 d h)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) (/.f64 (.f64 h #s(literal 1/2 binary64)) (.f64 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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 D))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 d (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 M (.f64 M (.f64 D D)))) (.f64 l (.f64 d (.f64 d #s(literal 4 binary64))))))) (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 -578960446186581/57896044618658097711785492504343953926634992332820282019728792003956564819968 binary64)) (.f64 (.f64 (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 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 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 M (.f64 D D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l))) d) (sqrt.f64 (.f64 h 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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -578960446186581/57896044618658097711785492504343953926634992332820282019728792003956564819968 binary64)) (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 (.f64 d d) #s(literal 4 binary64)))) #s(literal 1 binary64)))) (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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal 578358058743443/2891790293717214716875887454417538932071786405736015385275803577203398482289867263903614895099115516898199414270242812495998255990659472330369590362610632812985135197678301307466375242232528412389127536106326559094512549888 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 D))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) (/.f64 (.f64 d (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 M (.f64 M (.f64 D D)))) (.f64 l (.f64 d (.f64 d #s(literal 4 binary64))))))) (sqrt.f64 (.f64 l h))))))
(if (<=.f64 l #s(literal -96000000000000000992443601174876637993411737837407002015238863815040883868587245505610633432793088 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal -5871356456934583/4697085165547666455778961193578674054751365097816639741414581943064418050229216886927397996769537406063869952 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (neg.f64 (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))) (if (<=.f64 l #s(literal 5060056332682765/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 l #s(literal 3412647653636267/18446744073709551616 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 l #s(literal -96000000000000000992443601174876637993411737837407002015238863815040883868587245505610633432793088 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal -5871356456934583/4697085165547666455778961193578674054751365097816639741414581943064418050229216886927397996769537406063869952 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal -1/8 binary64) (.f64 M (.f64 (/.f64 M d) (.f64 D (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (neg.f64 D))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))) (if (<=.f64 l #s(literal 5060056332682765/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (/.f64 (.f64 M (.f64 D D)) d)))))) (if (<=.f64 l #s(literal 3412647653636267/18446744073709551616 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 l (.f64 d (.f64 d #s(literal 4 binary64))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 l #s(literal -96000000000000000992443601174876637993411737837407002015238863815040883868587245505610633432793088 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal -2348542582773833/73391955711682288371546268649666782105490079653384995959602842860381532034831513858240593699524021969747968 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (.f64 (/.f64 (.f64 M M) (neg.f64 d)) #s(literal -1/8 binary64)) (/.f64 (neg.f64 d) (sqrt.f64 (.f64 h l))))) (if (<=.f64 l #s(literal 5060056332682765/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 l #s(literal 3412647653636267/18446744073709551616 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 l #s(literal -96000000000000000992443601174876637993411737837407002015238863815040883868587245505610633432793088 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal -2348542582773833/73391955711682288371546268649666782105490079653384995959602842860381532034831513858240593699524021969747968 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 (.f64 D (.f64 D (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))) (neg.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 M M) d))) (/.f64 (neg.f64 d) (sqrt.f64 (.f64 l h))))) (if (<=.f64 l #s(literal 5060056332682765/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (/.f64 (.f64 M (.f64 D D)) d)))))) (if (<=.f64 l #s(literal 3412647653636267/18446744073709551616 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 l (.f64 d (.f64 d #s(literal 4 binary64))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 l #s(literal -194999999999999985415947151824818395000981181636734502998668940458070534661428599058845333979136 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal -6458492102628041/293567822846729153486185074598667128421960318613539983838411371441526128139326055432962374798096087878991872 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M M))) d) (/.f64 (neg.f64 d) (sqrt.f64 (.f64 h l))))) (if (<=.f64 l #s(literal 5060056332682765/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 l #s(literal 3412647653636267/18446744073709551616 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 l #s(literal -194999999999999985415947151824818395000981181636734502998668940458070534661428599058845333979136 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal -6458492102628041/293567822846729153486185074598667128421960318613539983838411371441526128139326055432962374798096087878991872 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M M))) d) (/.f64 (neg.f64 d) (sqrt.f64 (.f64 l h))))) (if (<=.f64 l #s(literal 5060056332682765/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (/.f64 (.f64 M (.f64 D D)) d)))))) (if (<=.f64 l #s(literal 3412647653636267/18446744073709551616 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 l (.f64 d (.f64 d #s(literal 4 binary64))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 d #s(literal -1499999999999999987235111512055860810821282557259208096610092736733707476955824128 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -4525239750366505/47634102635436893179040485073748265163400240214004076398607741693502376385799646303105256699577209032590132615988260237052123652332890095616 binary64)) (.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (if (<=.f64 d #s(literal 3107374960840175/21430172143725346418968500981200036211228096234110672148875007767407021022498722449863967576313917162551893458351062936503742905713846280871969155149397149607869135549648461970842149210124742283755908364306092949967163882534797535118331087892154125829142392955373084335320859663305248773674411336138752 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 d #s(literal 430000000000000012666249853873951972897900488720203819687817602139575630958763614831692065007468544 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -1499999999999999987235111512055860810821282557259208096610092736733707476955824128 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -4525239750366505/47634102635436893179040485073748265163400240214004076398607741693502376385799646303105256699577209032590132615988260237052123652332890095616 binary64)) (.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (.f64 l h)))) (if (<=.f64 d #s(literal 3107374960840175/21430172143725346418968500981200036211228096234110672148875007767407021022498722449863967576313917162551893458351062936503742905713846280871969155149397149607869135549648461970842149210124742283755908364306092949967163882534797535118331087892154125829142392955373084335320859663305248773674411336138752 binary64)) #s(approx (/ ( (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (/.f64 (.f64 M (.f64 D D)) d)))))) (if (<=.f64 d #s(literal 430000000000000012666249853873951972897900488720203819687817602139575630958763614831692065007468544 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 l (.f64 d (.f64 d #s(literal 4 binary64))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 d #s(literal -8001040677046041/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal 3107374960840175/21430172143725346418968500981200036211228096234110672148875007767407021022498722449863967576313917162551893458351062936503742905713846280871969155149397149607869135549648461970842149210124742283755908364306092949967163882534797535118331087892154125829142392955373084335320859663305248773674411336138752 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 d #s(literal 430000000000000012666249853873951972897900488720203819687817602139575630958763614831692065007468544 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 (.f64 d (.f64 d #s(literal 4 binary64))) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -8001040677046041/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal 3107374960840175/21430172143725346418968500981200036211228096234110672148875007767407021022498722449863967576313917162551893458351062936503742905713846280871969155149397149607869135549648461970842149210124742283755908364306092949967163882534797535118331087892154125829142392955373084335320859663305248773674411336138752 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (/.f64 (.f64 M (.f64 D D)) d)))))) (if (<=.f64 d #s(literal 430000000000000012666249853873951972897900488720203819687817602139575630958763614831692065007468544 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal -1/2 binary64))) (.f64 l (.f64 d (.f64 d #s(literal 4 binary64))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -8001040677046041/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal 3107374960840175/21430172143725346418968500981200036211228096234110672148875007767407021022498722449863967576313917162551893458351062936503742905713846280871969155149397149607869135549648461970842149210124742283755908364306092949967163882534797535118331087892154125829142392955373084335320859663305248773674411336138752 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 d #s(literal 75000000000000003141114417315859346924357539998025371235757078385524736 binary64)) (.f64 (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 #s(literal 4 binary64) (.f64 d d)))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -8001040677046041/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal 3107374960840175/21430172143725346418968500981200036211228096234110672148875007767407021022498722449863967576313917162551893458351062936503742905713846280871969155149397149607869135549648461970842149210124742283755908364306092949967163882534797535118331087892154125829142392955373084335320859663305248773674411336138752 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (/.f64 (.f64 M (.f64 D D)) d)))))) (if (<=.f64 d #s(literal 75000000000000003141114417315859346924357539998025371235757078385524736 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 (.f64 h #s(literal -1/2 binary64)) (.f64 l (.f64 (.f64 d d) #s(literal 4 binary64)))) #s(literal 1 binary64))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -8001040677046041/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -4051998235156121/98829225247710262867429368515096341332791332892647518728955741224331220492185227974590031104217345944915565363435943316108305047551656971126471386689813725547615929822542168634993607295943953291620980311754270053008792716515963231747120779125566189619536160406425180445475300105093018814544105228831057745755716670455808 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 d #s(literal 2439144006089287/43556142965880123323311949751266331066368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) (sqrt.f64 h)) (.f64 d (sqrt.f64 (.f64 l (.f64 l l)))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -8001040677046041/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -4051998235156121/98829225247710262867429368515096341332791332892647518728955741224331220492185227974590031104217345944915565363435943316108305047551656971126471386689813725547615929822542168634993607295943953291620980311754270053008792716515963231747120779125566189619536160406425180445475300105093018814544105228831057745755716670455808 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (/.f64 (.f64 M (.f64 D D)) d)))))) (if (<=.f64 d #s(literal 2439144006089287/43556142965880123323311949751266331066368 binary64)) #s(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 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64))) (.f64 d (sqrt.f64 (.f64 l (.f64 l l)))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -8001040677046041/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -4051998235156121/98829225247710262867429368515096341332791332892647518728955741224331220492185227974590031104217345944915565363435943316108305047551656971126471386689813725547615929822542168634993607295943953291620980311754270053008792716515963231747120779125566189619536160406425180445475300105093018814544105228831057745755716670455808 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))))))) (if (<=.f64 d #s(literal 2439144006089287/43556142965880123323311949751266331066368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 #s(literal -1/8 binary64) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -8001040677046041/186070713419675363980626894819329160794532188335953423432061490990243657757029868371504908982723472783555205531204141550984858016925351936 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -4051998235156121/98829225247710262867429368515096341332791332892647518728955741224331220492185227974590031104217345944915565363435943316108305047551656971126471386689813725547615929822542168634993607295943953291620980311754270053008792716515963231747120779125566189619536160406425180445475300105093018814544105228831057745755716670455808 binary64)) #s(approx (/ (* (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt (neg d))) (sqrt (neg l))) #s(approx (+ (* -1/8 (neg (* (* (* D D) (sqrt (/ h (* l (* l l))))) (/ (* M M) d)))) (* (sqrt (/ 1 (* h l))) (neg d))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (/.f64 (.f64 M (.f64 D D)) d)))))) (if (<=.f64 d #s(literal 2439144006089287/43556142965880123323311949751266331066368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 #s(literal -1/8 binary64) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -2604989987875455/93035356709837681990313447409664580397266094167976711716030745495121828878514934185752454491361736391777602765602070775492429008462675968 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -8879188205848969/772103322247736428651791941524190166662432288223808740069966728315087660095197093551484618001698015194652854401843307157096133183997320086925557708514169730840749451738610692460887556999562135090788908685580234789131193097780962748024381086918485856402626253175196722230275782071039209488625822100242638638716536487936 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 2439144006089287/43556142965880123323311949751266331066368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 #s(literal -1/8 binary64) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2604989987875455/93035356709837681990313447409664580397266094167976711716030745495121828878514934185752454491361736391777602765602070775492429008462675968 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -8879188205848969/772103322247736428651791941524190166662432288223808740069966728315087660095197093551484618001698015194652854401843307157096133183997320086925557708514169730840749451738610692460887556999562135090788908685580234789131193097780962748024381086918485856402626253175196722230275782071039209488625822100242638638716536487936 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 2439144006089287/43556142965880123323311949751266331066368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 D (.f64 M D))) (/.f64 #s(literal -1/8 binary64) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -2604989987875455/93035356709837681990313447409664580397266094167976711716030745495121828878514934185752454491361736391777602765602070775492429008462675968 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -8879188205848969/772103322247736428651791941524190166662432288223808740069966728315087660095197093551484618001698015194652854401843307157096133183997320086925557708514169730840749451738610692460887556999562135090788908685580234789131193097780962748024381086918485856402626253175196722230275782071039209488625822100242638638716536487936 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 5444517870735015/43556142965880123323311949751266331066368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 D (.f64 (.f64 (.f64 D (.f64 M M)) (/.f64 #s(literal -1/8 binary64) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2604989987875455/93035356709837681990313447409664580397266094167976711716030745495121828878514934185752454491361736391777602765602070775492429008462675968 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 d #s(literal -8879188205848969/772103322247736428651791941524190166662432288223808740069966728315087660095197093551484618001698015194652854401843307157096133183997320086925557708514169730840749451738610692460887556999562135090788908685580234789131193097780962748024381086918485856402626253175196722230275782071039209488625822100242638638716536487936 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 5444517870735015/43556142965880123323311949751266331066368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 D (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 M M)) (/.f64 #s(literal -1/8 binary64) d))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 l #s(literal -7347795403567931/34175792574734561318320347298712833833643272357706444319152665725155515612490248800367393390985216 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal 5060056332682765/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h l)))))))) (if (<=.f64 l #s(literal 7374460938428367/194064761537588616893622436057812819407110752139587076392381504753256369085797110791359801103580809743810966337141384150771447505514351798930535909380147642400556872002606238193783160703949805603157874899214558593861605856727007232 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 D (.f64 (.f64 (.f64 D (.f64 M M)) (/.f64 #s(literal -1/8 binary64) d)) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 l #s(literal -7347795403567931/34175792574734561318320347298712833833643272357706444319152665725155515612490248800367393390985216 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 l #s(literal 5060056332682765/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l h)))))))) (if (<=.f64 l #s(literal 7374460938428367/194064761537588616893622436057812819407110752139587076392381504753256369085797110791359801103580809743810966337141384150771447505514351798930535909380147642400556872002606238193783160703949805603157874899214558593861605856727007232 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 D (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 M M)) (/.f64 #s(literal -1/8 binary64) d))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 h #s(literal -2082060931841727/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) (/.f64 (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 (* h l)) (/ 1 (* h l))) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (.f64 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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 h #s(literal -2082060931841727/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) (/.f64 (.f64 (sqrt.f64 (neg.f64 d)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (neg.f64 l))) (if (<=.f64 h #s(literal -20240225330731/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 (* h l)) (/ 1 (* h l))) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (.f64 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 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h l)))))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.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)))) (.f64 d (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h l)))))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal +inf.0 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) #s(approx ( (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (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 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.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)))) (.f64 d (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 (* h l)) (/ 1 (* h l))) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (.f64 h 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 +inf.0 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal 0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 (* h l)) (/ 1 (* h l))) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (.f64 h 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 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal +inf.0 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) #s(approx (* (sqrt (/ d h)) (+ (* (/ (* M (* D (* M D))) (* (* d d) 4)) (* -1/2 (/ h l))) 1)) (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 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))))
(if (<=.f64 l #s(literal 44336241474093/4030567406735727282351225165683873035574701889313671280883489296162978382543372035785043761349923613698382530160958318167742519832631573007587730243400112738864034149162331269597866193210040596412843573823632724030670381872189039145190406026970187961498554846937088 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 44336241474093/4030567406735727282351225165683873035574701889313671280883489296162978382543372035785043761349923613698382530160958318167742519832631573007587730243400112738864034149162331269597866193210040596412843573823632724030670381872189039145190406026970187961498554846937088 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -5132091582190713/1832889850782397517082802171755189663406191307018921761884252780947908096342585866198098193012776216027479008590015982084761399088452696108828481666660133095712823955710669574545075280734654641679682560526831695838459555430831205351382962374814354898944 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(if (<=.f64 h #s(literal -5132091582190713/1832889850782397517082802171755189663406191307018921761884252780947908096342585866198098193012776216027479008590015982084761399088452696108828481666660133095712823955710669574545075280734654641679682560526831695838459555430831205351382962374814354898944 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(if (<=.f64 l #s(literal -3053105357605983/4697085165547666455778961193578674054751365097816639741414581943064418050229216886927397996769537406063869952 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (.f64 (/.f64 d (.f64 h l)) d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(if (<=.f64 l #s(literal -3053105357605983/4697085165547666455778961193578674054751365097816639741414581943064418050229216886927397996769537406063869952 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (.f64 d (/.f64 d (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

soundness3.4s (13.1%)

Memory

54.7MiB live, 3 220.5MiB allocated

Rules

8 850×	`lower-*.f64`
8 850×	`lower-*.f32`
8 340×	`lower-*.f64`
8 340×	`lower-*.f32`
7 522×	`lower-*.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	99	539
0	161	496
1	535	440
2	4226	432
0	8625	423
0	71	326
0	117	303
1	396	260
2	3315	251
0	8449	251
0	120	3277
1	321	3193
2	1147	3183
3	2635	3164
4	5494	3164
0	8538	3125
0	310	14701
1	923	14318
2	3441	14238
3	6499	14178
0	8528	13899
0	93	528
0	144	470
1	509	390
2	4446	379
0	8878	379
0	303	19578
1	890	18881
2	3072	18781
3	7359	18712
0	8046	18400
0	380	20345
1	1128	19789
2	4205	19716
3	6725	19668
0	8464	19287
0	22	64
0	38	60
1	124	59
2	828	59
0	8726	58

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

Compiler

Compiled 14 371 to 5 901 computations (58.9% saved)

preprocess230.0ms (0.9%)

Memory

9.9MiB live, 511.7MiB allocated

Remove

(sort M D)

(abs M)

(abs D)

Compiler

Compiled 9 996 to 1 448 computations (85.5% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated