Metrics for Henrywood and Agarwal, Equation (12)

start0.0ms (0%)

Memory: 0.2MiB live, 0.2MiB allocated; 0ms collecting garbage

analyze504.0ms (3.8%)

Memory

16.2MiB live, 958.4MiB allocated; 142ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 37 to 24 computations (35.1% saved)

sample5.9s (44.5%)

Memory

74.2MiB live, 7 027.8MiB allocated; 2.5s collecting garbage

Samples

3.1s	13 034×	0	invalid
1.5s	8 256×	0	valid

Precisions

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

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

ival-mult: 936.0ms (25.2% of total)

ival-sub: 739.0ms (19.9% of total)

ival-pow: 569.0ms (15.3% of total)

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

exact: 142.0ms (3.8% of total)

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

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

adjust: 6.0ms (0.2% of total)

Bogosity

explain361.0ms (2.7%)

Memory

2.5MiB live, 483.3MiB allocated; 58ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
72	-	3	(3.17826940379798e-226 8.339306668173499e+92 4.7214505816502256e+235 1.7829255796512041e-234 2.4164712596241912e-290)	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
62	-	3	(-1.8269154755416042e-48 -8.472722045808093e-104 -6.313639309045392e+265 -2.0579587062144597e-17 1.0942441749946255e-221)	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
44	-	1	(2.3031038338495097e-90 4.033471152007587e-287 7.641151012533699e+26 -6.916968581909962e-78 -1.831089216851562e+70)	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`
31	-	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))))`
19	-	2	(2.1142006230984326e-31 5.785253608587295e-146 1.5791369713125787e+120 -6.262778542516326e-223 9.294001097572109e-91)	`(/.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)))`	uflow-rescue	35	0
↳	`(/.f64 d h)`	underflow	35
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	34	0
↳	`(/.f64 d h)`	overflow	34
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	24	0
↳	`(/.f64 d l)`	overflow	24
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*uo**	15	0
↳	`(/.f64 d h)`	underflow	35
↳	`(/.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	23
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	86
↳	`(.f64 (/.f64 #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	86
↳	`(/.f64 h l)`	overflow	35
↳	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))`	overflow	89
↳	`(.f64 (.f64 (/.f64 #s(literal 1 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	89
↳	`(*.f64 M D)`	overflow	26
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	49
`*.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**	14	0
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	*no**	10	0
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	*ou**	6	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	86
↳	`(.f64 (/.f64 #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	86
↳	`(*.f64 M D)`	overflow	26
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	49
↳	`(/.f64 h l)`	underflow	34
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	o/n	5	0
↳	`(*.f64 M D)`	overflow	26
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*nu**	2	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	85
↳	`(.f64 (/.f64 #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	85
↳	`(*.f64 M D)`	underflow	28
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	underflow	38
↳	`(/.f64 h l)`	overflow	35

Confusion

	Predicted +	Predicted -
+	91	6
-	33	126

Precision

0.7338709677419355

Recall

0.9381443298969072

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	91	0	6
-	33	0	126

Precision?

0.7338709677419355

Recall?

0.9381443298969072

Freqs

test

number	freq
0	132
1	76
2	38
3	10

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

102.0ms

512×

valid

Compiler

Compiled 347 to 70 computations (79.8% saved)

Precisions

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

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

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

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

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

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

exact: 1.0ms (1.6% of total)

adjust: 0.0ms (0% of total)

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

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

preprocess163.0ms (1.2%)

Memory

-21.9MiB live, 253.6MiB allocated; 62ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	168	564
1	540	553
2	2122	548
3	6634	548
0	22	29
0	38	27
1	67	27
2	180	27
3	1202	27
4	4872	27
0	8241	26

Stop Event

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

Calls

Call 1

Inputs

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

Outputs

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

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

Symmetry

(abs D)

(abs M)

(sort M D)

Compiler

Compiled 35 to 22 computations (37.1% saved)

eval0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 5 computations (-∞% saved)

prune0.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated; 0ms collecting garbage

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

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

simplify137.0ms (1%)

Memory

-3.6MiB live, 141.5MiB allocated; 22ms collecting garbage

Localize:

Found 4 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	22	132
0	38	126
1	67	126
2	180	126
3	1202	126
4	4872	126
0	8241	124

Stop Event

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

Calls

Call 1

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

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

localize62.0ms (0.5%)

Memory

24.5MiB live, 114.9MiB allocated; 7ms collecting garbage

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	7.50929848499198	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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.179176218732568	(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy	14.373028709950727	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	16.546799942900712	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

48.0ms

256×

valid

Compiler

Compiled 156 to 24 computations (84.6% saved)

Precisions

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

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

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

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

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

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

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

series62.0ms (0.5%)

Memory

-27.9MiB live, 119.9MiB allocated; 10ms collecting garbage

Counts

6 → 32

Calls

Call 1

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

Calls

15 calls:

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

simplify279.0ms (2.1%)

Memory

37.0MiB live, 236.3MiB allocated; 23ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	192	1293
1	521	1252
2	2087	1235
0	7381	1193

Stop Event

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

Counts

32 → 32

Calls

Call 1

Inputs
#s(approx (pow (/ d h) (/ 1 2)) #s(hole binary64 (sqrt (/ d h))))
#s(approx (pow (/ d l) (/ 1 2)) #s(hole binary64 (sqrt (/ d l))))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(hole binary64 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(hole binary64 (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))))
#s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) #s(hole binary64 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(hole binary64 1))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(hole binary64 (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (* d (sqrt (/ 1 (* h l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))))
#s(approx (pow (/ d h) (/ 1 2)) #s(hole binary64 (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))))
#s(approx (pow (/ d l) (/ 1 2)) #s(hole binary64 (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(hole binary64 (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))))
#s(approx (pow (/ d h) (/ 1 2)) #s(hole binary64 (* (sqrt (/ d h)) (pow (sqrt -1) 2))))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(hole binary64 (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(hole binary64 (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))))
#s(approx (pow (/ d l) (/ 1 2)) #s(hole binary64 (* (sqrt (/ d l)) (pow (sqrt -1) 2))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(hole binary64 (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))))
#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(hole binary64 (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(hole binary64 (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))))

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

rewrite136.0ms (1%)

Memory

-29.9MiB live, 67.5MiB allocated; 13ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	22	72
0	38	68
1	110	67
0	671	65

Stop Event

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

Counts

6 → 73

Calls

Call 1

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

eval10.0ms (0.1%)

Memory: 17.6MiB live, 17.6MiB allocated; 0ms collecting garbage
Compiler: Compiled 4 089 to 419 computations (89.8% saved)

prune37.0ms (0.3%)

Memory

-21.6MiB live, 24.8MiB allocated; 2ms collecting garbage

Pruning

20 alts after pruning (20 fresh and 0 done)

	Pruned	Kept	Total
New	77	20	97
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	78	20	98

Accuracy

88.0%

Counts

98 → 20

Alt Table

Click to see full alt table

Status	Accuracy	Program
	49.5%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (/.f64 d h))))
	62.9%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
▶	63.3%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	63.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
▶	65.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
	50.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 h #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 M M) D) (/.f64 D (.f64 (.f64 d d) l))) #s(literal 1 binary64))))
	20.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 h (/.f64 (*.f64 M M) l)))))
	33.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	33.9%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
▶	63.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	37.8%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	35.4%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
	40.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	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 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l)))
	28.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 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h))
	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 (.f64 (.f64 M M) (.f64 (/.f64 (*.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	13.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
▶	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	27.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))

Compiler

Compiled 1 748 to 1 160 computations (33.6% saved)

simplify125.0ms (1%)

Memory

13.7MiB live, 105.0MiB allocated; 7ms collecting garbage

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	74	607
0	124	596
1	218	588
2	562	588
3	3515	588
4	7711	588
0	8003	588

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

localize233.0ms (1.8%)

Memory

30.8MiB live, 216.8MiB allocated; 20ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	7.50929848499198	(.f64 (.f64 (pow.f64 (/.f64 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))))
accuracy	10.179176218732568	(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy	14.373028709950727	(sqrt.f64 (/.f64 d l))
accuracy	16.546799942900712	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	4.31704435827221	(*.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))
accuracy	7.794583766061512	(fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64))
accuracy	14.373028709950727	(sqrt.f64 (/.f64 d l))
accuracy	16.546799942900712	(sqrt.f64 (/.f64 d h))
accuracy	9.590916582009596	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
accuracy	14.66041379500349	(.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d))
accuracy	18.541922499133808	(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
accuracy	30.69191563937269	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
accuracy	0.21484375	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
accuracy	0.5065159109516679	(/.f64 #s(literal 1 binary64) (*.f64 l h))
accuracy	9.590916582009596	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
accuracy	46.945136768340774	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
accuracy	4.973266041001471	(/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)
accuracy	7.50929848499198	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
accuracy	14.373028709950727	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	16.546799942900712	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

176.0ms

256×

valid

Compiler

Compiled 618 to 62 computations (90% saved)

Precisions

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

ival-mult: 87.0ms (64.5% of total)

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

ival-pow: 14.0ms (10.4% of total)

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

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

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

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

exact: 1.0ms (0.7% of total)

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

adjust: 0.0ms (0% of total)

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

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

series148.0ms (1.1%)

Memory

-13.9MiB live, 136.8MiB allocated; 13ms collecting garbage

Counts

25 → 145

Calls

Call 1

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

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

Calls

15 calls:

Time	Variable		Point	Expression
29.0ms	d	@	-inf	((/ 1 2) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (/ 1 (* l h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (+ (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (neg d) (sqrt (/ 1 (* l h))))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (* (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (/ h (pow l 3))) (sqrt (/ d h)) (sqrt (/ d l)) (* (/ D 2) (/ M d)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))
24.0ms	d	@	0	((/ 1 2) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (/ 1 (* l h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (+ (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (neg d) (sqrt (/ 1 (* l h))))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (* (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (/ h (pow l 3))) (sqrt (/ d h)) (sqrt (/ d l)) (* (/ D 2) (/ M d)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))
19.0ms	M	@	-inf	((/ 1 2) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (/ 1 (* l h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (+ (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (neg d) (sqrt (/ 1 (* l h))))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (* (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (/ h (pow l 3))) (sqrt (/ d h)) (sqrt (/ d l)) (* (/ D 2) (/ M d)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))
7.0ms	h	@	-inf	((/ 1 2) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (/ 1 (* l h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (+ (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (neg d) (sqrt (/ 1 (* l h))))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (* (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (/ h (pow l 3))) (sqrt (/ d h)) (sqrt (/ d l)) (* (/ D 2) (/ M d)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))
7.0ms	d	@	inf	((/ 1 2) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (/ 1 (* l h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (+ (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (neg d) (sqrt (/ 1 (* l h))))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (* (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (/ h (pow l 3))) (sqrt (/ d h)) (sqrt (/ d l)) (* (/ D 2) (/ M d)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))

simplify163.0ms (1.2%)

Memory

-4.6MiB live, 221.9MiB allocated; 42ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	467	6386
1	1203	6109
2	4806	6105
0	8512	5928

Stop Event

1×	iter limit
1×	node limit

Counts

145 → 145

Calls

Call 1

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

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

rewrite90.0ms (0.7%)

Memory

12.7MiB live, 116.5MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	74	384
0	124	374
1	341	359
0	1825	359

Stop Event

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

Counts

25 → 439

Calls

Call 1

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

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

eval60.0ms (0.5%)

Memory: 12.3MiB live, 103.2MiB allocated; 9ms collecting garbage
Compiler: Compiled 20 073 to 1 706 computations (91.5% saved)

prune91.0ms (0.7%)

Memory

-22.2MiB live, 165.5MiB allocated; 21ms collecting garbage

Pruning

43 alts after pruning (42 fresh and 1 done)

	Pruned	Kept	Total
New	379	38	417
Fresh	11	4	15
Picked	4	1	5
Done	0	0	0
Total	394	43	437

Accuracy

91.7%

Counts

437 → 43

Alt Table

Click to see full alt table

Status	Accuracy	Program
	33.2%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 d)) (sqrt.f64 l))
	49.5%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (/.f64 d h))))
	36.2%	(.f64 (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
	61.7%	(.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
▶	62.1%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal -1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
▶	63.3%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	51.9%	(.f64 (.f64 (fma.f64 #s(approx (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 (/.f64 M d) M) d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	63.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) (*.f64 #s(literal 1/2 binary64) (/.f64 h l))))))
	50.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 h #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 M M) D) (/.f64 D (.f64 (.f64 d d) l))) #s(literal 1 binary64))))
	35.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
	35.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
▶	65.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
	3.9%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #s(approx (sqrt (/ d l)) (neg.f64 (sqrt.f64 (/.f64 d l))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
	39.6%	(.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 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
	37.8%	(.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 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	63.3%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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))))
	49.2%	(.f64 (.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (neg.f64 h) (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 (.f64 D D) d) d)) (/.f64 (*.f64 M M) l)) (/.f64 #s(literal 1 binary64) h)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	39.3%	(.f64 #s(approx ( (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (fma.f64 (.f64 (.f64 D D) (.f64 (/.f64 (.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 d l)))
	17.9%	(.f64 #s(approx ( (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.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.f64 (/.f64 d l)))
	30.8%	(.f64 #s(approx ( (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.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.f64 (/.f64 d l)))
	22.8%	(.f64 #s(approx ( (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)) (sqrt.f64 (/.f64 d l)))
	39.7%	(.f64 #s(approx ( (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	30.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (.f64 (.f64 (/.f64 M d) M) (.f64 #s(literal 1/8 binary64) D)) D) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
	26.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (.f64 (.f64 (.f64 D D) M) (/.f64 M d)) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
	24.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l 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)))) (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1 binary64)))))))
	43.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (/.f64 M d) M)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	19.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 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (/.f64 M d) M)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l)))
	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (.f64 d #s(literal 1 binary64)) (sqrt.f64 (.f64 l h))))
	28.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 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h))
	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (.f64 l h) #s(literal -1/2 binary64)) 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 (sqrt.f64 (pow.f64 l #s(literal -1 binary64))) (sqrt.f64 h)) d))
▶	26.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	17.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (*.f64 (/.f64 M d) M) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
	26.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal -1 binary64)) h)) d))
	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)) d))
✓	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	26.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (.f64 (pow.f64 l #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) h))) 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)))) (.f64 (sqrt.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1 binary64)))) d))
	27.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	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)))) (.f64 (exp.f64 (.f64 (log.f64 (pow.f64 (*.f64 l h) #s(literal -1 binary64))) #s(literal 1/2 binary64))) d))
	19.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (+ (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (neg d) (sqrt (/ 1 (* l h))))) (/.f64 (fma.f64 (.f64 (/.f64 M d) M) (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (sqrt.f64 (.f64 l h))) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (neg.f64 d))) (*.f64 l l))))
	15.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (+ (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (neg d) (sqrt (/ 1 (* l h))))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (/.f64 M d) M))))

Compiler

Compiled 3 934 to 2 654 computations (32.5% saved)

simplify108.0ms (0.8%)

Memory

-15.4MiB live, 129.9MiB allocated; 11ms collecting garbage

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	69	545
0	113	510
1	217	493
2	547	491
3	4246	489
0	8049	489

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

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

localize310.0ms (2.4%)

Memory

-3.7MiB live, 388.3MiB allocated; 123ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	4.673051651294156	(exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1 binary64)))
accuracy	9.590916582009596	(sqrt.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1 binary64))))
accuracy	9.939182169176147	(log.f64 (*.f64 l h))
accuracy	46.945136768340774	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1 binary64)))) d))
accuracy	4.251325012767012	(/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))
accuracy	7.794583766061512	(fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64))
accuracy	14.373028709950727	(sqrt.f64 (/.f64 d l))
accuracy	16.546799942900712	(sqrt.f64 (/.f64 d h))
accuracy	7.682051083710434	(*.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M)
accuracy	7.794583766061512	(fma.f64 (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal -1/2 binary64))) (/.f64 h l) #s(literal 1 binary64))
accuracy	14.373028709950727	(sqrt.f64 (/.f64 d l))
accuracy	16.546799942900712	(sqrt.f64 (/.f64 d h))
accuracy	0.21484375	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)
accuracy	0.2578125	(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
accuracy	9.804122371060396	(sqrt.f64 (*.f64 l h))
accuracy	46.945136768340774	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
accuracy	4.973266041001471	(/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)
accuracy	7.50929848499198	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
accuracy	14.373028709950727	(sqrt.f64 (/.f64 d l))
accuracy	16.546799942900712	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

266.0ms

256×

valid

Compiler

Compiled 553 to 65 computations (88.2% saved)

Precisions

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

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

ival-div: 63.0ms (31.3% of total)

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

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

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

ival-exp: 3.0ms (1.5% of total)

ival-log: 3.0ms (1.5% of total)

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

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

exact: 1.0ms (0.5% of total)

adjust: 0.0ms (0% of total)

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

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

series220.0ms (1.7%)

Memory

6.1MiB live, 286.0MiB allocated; 55ms collecting garbage

Counts

28 → 153

Calls

Call 1

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

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

Calls

15 calls:

Time	Variable		Point	Expression
40.0ms	h	@	-inf	((/ 1 2) (pow (/ d h) (/ 1 2)) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (* (/ 1 (sqrt (* l h))) d) (/ 1 (sqrt (* l h))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (* l h)) (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (* (* (/ (/ D d) 2) M) -1/2) (* (* (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (* (* (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (* (sqrt (exp (* (log (* l h)) -1))) d) (sqrt (exp (* (log (* l h)) -1))) (exp (* (log (* l h)) -1)) (* (log (* l h)) -1) (sqrt (/ d l)) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (/ d h)) (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (* (/ (/ D d) 2) M) (/ (* M D) (* d 2)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (log (* l h)))
36.0ms	h	@	0	((/ 1 2) (pow (/ d h) (/ 1 2)) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (* (/ 1 (sqrt (* l h))) d) (/ 1 (sqrt (* l h))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (* l h)) (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (* (* (/ (/ D d) 2) M) -1/2) (* (* (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (* (* (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (* (sqrt (exp (* (log (* l h)) -1))) d) (sqrt (exp (* (log (* l h)) -1))) (exp (* (log (* l h)) -1)) (* (log (* l h)) -1) (sqrt (/ d l)) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (/ d h)) (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (* (/ (/ D d) 2) M) (/ (* M D) (* d 2)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (log (* l h)))
33.0ms	D	@	-inf	((/ 1 2) (pow (/ d h) (/ 1 2)) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (* (/ 1 (sqrt (* l h))) d) (/ 1 (sqrt (* l h))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (* l h)) (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (* (* (/ (/ D d) 2) M) -1/2) (* (* (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (* (* (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (* (sqrt (exp (* (log (* l h)) -1))) d) (sqrt (exp (* (log (* l h)) -1))) (exp (* (log (* l h)) -1)) (* (log (* l h)) -1) (sqrt (/ d l)) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (/ d h)) (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (* (/ (/ D d) 2) M) (/ (* M D) (* d 2)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (log (* l h)))
22.0ms	h	@	inf	((/ 1 2) (pow (/ d h) (/ 1 2)) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (* (/ 1 (sqrt (* l h))) d) (/ 1 (sqrt (* l h))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (* l h)) (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (* (* (/ (/ D d) 2) M) -1/2) (* (* (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (* (* (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (* (sqrt (exp (* (log (* l h)) -1))) d) (sqrt (exp (* (log (* l h)) -1))) (exp (* (log (* l h)) -1)) (* (log (* l h)) -1) (sqrt (/ d l)) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (/ d h)) (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (* (/ (/ D d) 2) M) (/ (* M D) (* d 2)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (log (* l h)))
18.0ms	l	@	-inf	((/ 1 2) (pow (/ d h) (/ 1 2)) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (* (/ 1 (sqrt (* l h))) d) (/ 1 (sqrt (* l h))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (* l h)) (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (* (* (/ (/ D d) 2) M) -1/2) (* (* (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (* (* (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (* (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (sqrt (/ d h))) (+ (* (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (/ h l)) 1) (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (* (sqrt (exp (* (log (* l h)) -1))) d) (sqrt (exp (* (log (* l h)) -1))) (exp (* (log (* l h)) -1)) (* (log (* l h)) -1) (sqrt (/ d l)) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (/ d h)) (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (* (/ (/ D d) 2) M) (/ (* M D) (* d 2)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (log (* l h)))

simplify124.0ms (0.9%)

Memory

29.0MiB live, 161.3MiB allocated; 17ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	473	6315
1	1157	6057
2	4004	5999
0	8346	5803

Stop Event

1×	iter limit
1×	node limit

Counts

153 → 153

Calls

Call 1

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

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

rewrite108.0ms (0.8%)

Memory

-32.5MiB live, 79.6MiB allocated; 52ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	69	400
0	113	366
1	342	342
0	1716	342

Stop Event

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

Counts

28 → 573

Calls

Call 1

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

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

eval79.0ms (0.6%)

Memory: 15.2MiB live, 59.8MiB allocated; 6ms collecting garbage
Compiler: Compiled 16 572 to 1 818 computations (89% saved)

prune56.0ms (0.4%)

Memory

25.8MiB live, 118.8MiB allocated; 13ms collecting garbage

Pruning

48 alts after pruning (45 fresh and 3 done)

	Pruned	Kept	Total
New	396	26	422
Fresh	18	19	37
Picked	3	2	5
Done	0	1	1
Total	417	48	465

Accuracy

91.7%

Counts

465 → 48

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	49.5%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (/.f64 d h))))
	36.2%	(.f64 (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
	61.7%	(.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (.f64 (*.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal -1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	61.7%	(.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	32.0%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal -1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))
	33.1%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal -1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
	62.1%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(approx (* (* (/ (/ D d) 2) M) -1/2) (.f64 (.f64 (/.f64 D d) M) #s(literal -1/4 binary64)))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	33.9%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
✓	63.3%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	51.9%	(.f64 (.f64 (fma.f64 #s(approx (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M (/.f64 M d)) d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	50.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 h #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 M M) D) (/.f64 D (.f64 (.f64 d d) l))) #s(literal 1 binary64))))
	35.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
	35.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
	61.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 M d) (.f64 (/.f64 D #s(literal 2 binary64)) (.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 M #s(literal 2 binary64))) (/.f64 D d)))) #s(literal 1 binary64)))
	39.6%	(.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 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
▶	65.4%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
	53.1%	(.f64 (.f64 #s(approx (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (.f64 (neg.f64 h) (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 D (/.f64 D d)) d)) (/.f64 (*.f64 M M) l)) (/.f64 #s(literal 1 binary64) h)))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	3.9%	(.f64 (.f64 #s(approx (sqrt (/ d h)) (neg.f64 (sqrt.f64 (/.f64 d h)))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
	17.9%	(.f64 #s(approx ( (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.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.f64 (/.f64 d l)))
	22.8%	(.f64 #s(approx ( (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)) (sqrt.f64 (/.f64 d l)))
	11.9%	(.f64 #s(approx ( (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (.f64 (.f64 (.f64 D D) (.f64 (/.f64 (*.f64 M M) l) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 d #s(literal 3 binary64)))))) (sqrt.f64 (/.f64 d l)))
	39.7%	(.f64 #s(approx ( (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	30.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (.f64 (.f64 (/.f64 M d) M) (.f64 #s(literal 1/8 binary64) D)) D) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
	26.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (.f64 (.f64 (.f64 D D) M) (/.f64 M d)) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l 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)))) (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1 binary64)))))))
	43.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (/.f64 M d) M)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	19.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 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (/.f64 M d) M)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l)))
	23.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
▶	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
	28.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 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h))
	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (.f64 l h) #s(literal -1/2 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 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (.f64 l h) #s(literal 1/4 binary64)) (pow.f64 (.f64 l h) #s(literal 1/4 binary64)))) 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) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
✓	26.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	17.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (*.f64 (/.f64 M d) M) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
	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)))) (.f64 (sqrt.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (.f64 l h)))) d))
▶	26.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal -1 binary64)) h)) d))
	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)) d))
	1.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 (-.f64 (.f64 (cosh.f64 (neg.f64 (log.f64 (.f64 l h)))) (cosh.f64 (neg.f64 (log.f64 (.f64 l h))))) (.f64 (sinh.f64 (neg.f64 (log.f64 (.f64 l h)))) (sinh.f64 (neg.f64 (log.f64 (.f64 l h)))))) (-.f64 (cosh.f64 (neg.f64 (log.f64 (.f64 l h)))) (sinh.f64 (neg.f64 (log.f64 (*.f64 l h))))))) d))
✓	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	3.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 (exp.f64 #s(approx ( (log (* l h)) -1) (fma.f64 (log.f64 (neg.f64 l)) #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) h)))))) d))
	27.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	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)))) (.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
	19.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (+ (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (neg d) (sqrt (/ 1 (* l h))))) (/.f64 (fma.f64 (.f64 (/.f64 M d) M) (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (sqrt.f64 (.f64 l h))) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (neg.f64 d))) (*.f64 l l))))
	15.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (+ (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (neg d) (sqrt (/ 1 (* l h))))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (*.f64 (/.f64 M d) M))))
	27.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (* (sqrt (exp (* (log (* l h)) -1))) d) (.f64 (neg.f64 d) (pow.f64 (.f64 l h) #s(literal -1/2 binary64)))))
	17.5%	#s(approx (* (* (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (.f64 (.f64 (.f64 D D) (.f64 (*.f64 M (/.f64 M d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	15.5%	#s(approx (* (* (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt (/ d l))) (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 #s(literal -1 binary64) (.f64 M (/.f64 M d)))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))

Compiler

Compiled 4 428 to 2 905 computations (34.4% saved)

simplify118.0ms (0.9%)

Memory

12.1MiB live, 145.3MiB allocated; 15ms collecting garbage

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	60	447
0	92	411
1	163	404
2	432	404
3	2792	404
0	8051	404

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

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

localize228.0ms (1.7%)

Memory

-3.3MiB live, 281.7MiB allocated; 40ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.2578125	(/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (.f64 l h) #s(literal 1/4 binary64)) (pow.f64 (*.f64 l h) #s(literal 1/4 binary64))))
accuracy	0.521816259768442	(.f64 (pow.f64 (.f64 l h) #s(literal 1/4 binary64)) (pow.f64 (*.f64 l h) #s(literal 1/4 binary64)))
accuracy	9.908214629283195	(pow.f64 (*.f64 l h) #s(literal 1/4 binary64))
accuracy	46.945136768340774	#s(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) (.f64 (pow.f64 (.f64 l h) #s(literal 1/4 binary64)) (pow.f64 (.f64 l h) #s(literal 1/4 binary64)))) d))
accuracy	4.31704435827221	(*.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d))
accuracy	7.50929848499198	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (/.f64 d h))))
accuracy	7.794583766061512	(fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64))
accuracy	22.522361802878777	(sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h)))
accuracy	0.21484375	(*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal -1 binary64)) h)) d)
accuracy	0.23046875	(/.f64 (pow.f64 l #s(literal -1 binary64)) h)
accuracy	9.590916582009596	(sqrt.f64 (/.f64 (pow.f64 l #s(literal -1 binary64)) h))
accuracy	46.945136768340774	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal -1 binary64)) h)) d))
accuracy	0.0	(*.f64 l h)
accuracy	0.203125	(/.f64 d (sqrt.f64 (*.f64 l h)))
accuracy	9.804122371060396	(sqrt.f64 (*.f64 l h))
accuracy	46.945136768340774	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
accuracy	4.973266041001471	(/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)
accuracy	7.50929848499198	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
accuracy	14.373028709950727	(sqrt.f64 (/.f64 d l))
accuracy	16.546799942900712	(sqrt.f64 (/.f64 d h))

Samples

184.0ms

256×

valid

Compiler

Compiled 437 to 57 computations (87% saved)

Precisions

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

ival-mult: 77.0ms (48.7% of total)

ival-pow: 33.0ms (20.9% of total)

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

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

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

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

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

exact: 1.0ms (0.6% of total)

adjust: 0.0ms (0% of total)

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

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

series133.0ms (1%)

Memory

-3.0MiB live, 232.8MiB allocated; 50ms collecting garbage

Counts

25 → 100

Calls

Call 1

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

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

Calls

15 calls:

Time	Variable		Point	Expression
24.0ms	h	@	-inf	((- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (* (sqrt (/ d h)) (sqrt (/ d l))) (sqrt (/ d h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ (pow l -1) h)) d) (sqrt (/ (pow l -1) h)) (/ (pow l -1) h) (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (pow (* (/ D 2) (/ M d)) 2) (* (pow (* l h) 1/4) (pow (* l h) 1/4)) (* (/ 1 (* (pow (* l h) 1/4) (pow (* l h) 1/4))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (* (pow (* l h) 1/4) (pow (* l h) 1/4))) (sqrt (/ d l)) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (* (/ d l) (/ d h))) (* (/ D 2) (/ M d)) (pow (* l h) 1/4))
14.0ms	l	@	inf	((- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (* (sqrt (/ d h)) (sqrt (/ d l))) (sqrt (/ d h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ (pow l -1) h)) d) (sqrt (/ (pow l -1) h)) (/ (pow l -1) h) (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (pow (* (/ D 2) (/ M d)) 2) (* (pow (* l h) 1/4) (pow (* l h) 1/4)) (* (/ 1 (* (pow (* l h) 1/4) (pow (* l h) 1/4))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (* (pow (* l h) 1/4) (pow (* l h) 1/4))) (sqrt (/ d l)) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (* (/ d l) (/ d h))) (* (/ D 2) (/ M d)) (pow (* l h) 1/4))
12.0ms	h	@	inf	((- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (* (sqrt (/ d h)) (sqrt (/ d l))) (sqrt (/ d h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ (pow l -1) h)) d) (sqrt (/ (pow l -1) h)) (/ (pow l -1) h) (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (pow (* (/ D 2) (/ M d)) 2) (* (pow (* l h) 1/4) (pow (* l h) 1/4)) (* (/ 1 (* (pow (* l h) 1/4) (pow (* l h) 1/4))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (* (pow (* l h) 1/4) (pow (* l h) 1/4))) (sqrt (/ d l)) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (* (/ d l) (/ d h))) (* (/ D 2) (/ M d)) (pow (* l h) 1/4))
12.0ms	l	@	-inf	((- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (* (sqrt (/ d h)) (sqrt (/ d l))) (sqrt (/ d h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ (pow l -1) h)) d) (sqrt (/ (pow l -1) h)) (/ (pow l -1) h) (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (pow (* (/ D 2) (/ M d)) 2) (* (pow (* l h) 1/4) (pow (* l h) 1/4)) (* (/ 1 (* (pow (* l h) 1/4) (pow (* l h) 1/4))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (* (pow (* l h) 1/4) (pow (* l h) 1/4))) (sqrt (/ d l)) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (* (/ d l) (/ d h))) (* (/ D 2) (/ M d)) (pow (* l h) 1/4))
11.0ms	M	@	-inf	((- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l))) (* (sqrt (/ d h)) (sqrt (/ d l))) (sqrt (/ d h)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ (pow l -1) h)) d) (sqrt (/ (pow l -1) h)) (/ (pow l -1) h) (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (pow (* (/ D 2) (/ M d)) 2) (* (pow (* l h) 1/4) (pow (* l h) 1/4)) (* (/ 1 (* (pow (* l h) 1/4) (pow (* l h) 1/4))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (* (pow (* l h) 1/4) (pow (* l h) 1/4))) (sqrt (/ d l)) (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l) (sqrt (* (/ d l) (/ d h))) (* (/ D 2) (/ M d)) (pow (* l h) 1/4))

simplify169.0ms (1.3%)

Memory

-21.7MiB live, 167.2MiB allocated; 37ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	345	3750
1	848	3634
2	3005	3605
0	8938	3497

Stop Event

1×	iter limit
1×	node limit

Counts

100 → 100

Calls

Call 1

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

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

rewrite37.0ms (0.3%)

Memory

14.3MiB live, 60.1MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	60	347
0	92	308
0	291	308

Stop Event

1×	iter limit
1×	iter limit
1×	iter limit
1×	unsound
1×	iter limit

Counts

25 → 97

Calls

Call 1

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

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

eval22.0ms (0.2%)

Memory: -3.9MiB live, 52.9MiB allocated; 5ms collecting garbage
Compiler: Compiled 7 132 to 672 computations (90.6% saved)

prune86.0ms (0.7%)

Memory

0.1MiB live, 140.8MiB allocated; 6ms collecting garbage

Pruning

52 alts after pruning (47 fresh and 5 done)

	Pruned	Kept	Total
New	149	22	171
Fresh	15	25	40
Picked	3	2	5
Done	0	3	3
Total	167	52	219

Accuracy

92.1%

Counts

219 → 52

Alt Table

Click to see full alt table

Status	Accuracy	Program
	36.9%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) #s(approx (sqrt ( (/ d l) (/ d h))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))))
	49.5%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 #s(approx (* (/ D 2) (/ M d)) (.f64 (.f64 #s(literal 1/2 binary64) D) (/.f64 M d))) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
	49.0%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (/.f64 d h))))
	39.9%	(.f64 (fma.f64 #s(approx ( -1/2 (pow (* (/ D 2) (/ M d)) 2)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M (/.f64 M d)) d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))
	36.2%	(.f64 (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l)))
	61.7%	(.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	32.0%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal -1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))
	33.1%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal -1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
	62.1%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(approx (* (* (/ (/ D d) 2) M) -1/2) (.f64 (.f64 (/.f64 D d) M) #s(literal -1/4 binary64)))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	33.9%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 d) (sqrt.f64 l)))
✓	63.3%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	51.9%	(.f64 (.f64 (fma.f64 #s(approx (* -1/2 (pow (/ (* M D) (* d 2)) 2)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M (/.f64 M d)) d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	50.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 h #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 M M) D) (/.f64 D (.f64 (.f64 d d) l))) #s(literal 1 binary64))))
	61.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 M d) (.f64 (/.f64 D #s(literal 2 binary64)) (.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 M #s(literal 2 binary64))) (/.f64 D d)))) #s(literal 1 binary64)))
	64.6%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) (*.f64 #s(literal 1/2 binary64) h)) l)))
	53.5%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (fma.f64 (.f64 h #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) l) (/.f64 (.f64 M (/.f64 M d)) d)) #s(literal 1 binary64))))
	20.5%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (/.f64 (.f64 D D) d) d)) (/.f64 (.f64 (*.f64 M M) h) l))))
	3.9%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) #s(approx (sqrt (/ d l)) (neg.f64 (sqrt.f64 (/.f64 d l))))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) h)) l)))
	39.4%	(.f64 #s(approx (- 1 (/ ( (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (.f64 (neg.f64 h) (-.f64 (.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (/.f64 (.f64 D D) d) d)) (/.f64 (.f64 M M) l)) (/.f64 #s(literal 1 binary64) h)))) (sqrt.f64 (.f64 (/.f64 d l) (/.f64 d h))))
	17.9%	(.f64 #s(approx ( (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.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.f64 (/.f64 d l)))
	22.8%	(.f64 #s(approx ( (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 d #s(literal 3 binary64)) h))) (sqrt.f64 (/.f64 d (pow.f64 h #s(literal 3 binary64))))) h)) (sqrt.f64 (/.f64 d l)))
	39.7%	(.f64 #s(approx ( (+ (* (* (* (/ (/ D d) 2) M) (* (* (/ (/ D d) 2) M) -1/2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	38.3%	(.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)) d)) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) h)) l)))
	40.6%	(.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) h)) l)))
	34.0%	#s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (fma.f64 (.f64 (.f64 (.f64 (.f64 M (/.f64 M d)) #s(literal -1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) D) D (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)) d)))
	43.8%	#s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M (/.f64 M d))) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	23.0%	#s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (.f64 M M) D) D) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)) (.f64 d d))) d))
	19.5%	#s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 l h))) (.f64 (.f64 M (/.f64 M d)) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l)))
	30.8%	#s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 M (/.f64 M d))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h))
	17.5%	#s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (.f64 (.f64 (.f64 D D) (.f64 (*.f64 M (/.f64 M d)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	15.5%	#s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (*.f64 M (/.f64 M d))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	26.7%	#s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)) d))
	27.7%	#s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l))))
	30.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (.f64 (.f64 (/.f64 M d) M) (.f64 #s(literal 1/8 binary64) D)) D) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
	26.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (.f64 (.f64 (.f64 D D) M) (/.f64 M d)) #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l 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)))) (fma.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1 binary64)))))))
	23.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
	23.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 (pow.f64 (.f64 (.f64 l h) (*.f64 l h)) #s(literal 1/4 binary64))))
	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 (sqrt.f64 l) (sqrt.f64 h))))
✓	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (.f64 l h) #s(literal -1/2 binary64)) d))
✓	26.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	17.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (*.f64 (/.f64 M d) M) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
	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)))) (.f64 (sqrt.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (.f64 l h)))) d))
✓	26.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal -1 binary64)) h)) d))
	1.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 (-.f64 (.f64 (cosh.f64 (neg.f64 (log.f64 (.f64 l h)))) (cosh.f64 (neg.f64 (log.f64 (.f64 l h))))) (.f64 (sinh.f64 (neg.f64 (log.f64 (.f64 l h)))) (sinh.f64 (neg.f64 (log.f64 (.f64 l h)))))) (-.f64 (cosh.f64 (neg.f64 (log.f64 (.f64 l h)))) (sinh.f64 (neg.f64 (log.f64 (*.f64 l h))))))) d))
✓	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	3.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 (exp.f64 #s(approx ( (log (* l h)) -1) (fma.f64 (log.f64 (neg.f64 l)) #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) h)))))) d))
	27.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	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)))) (.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
	19.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (+ (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (neg d) (sqrt (/ 1 (* l h))))) (/.f64 (fma.f64 (.f64 (/.f64 M d) M) (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (sqrt.f64 (.f64 l h))) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (neg.f64 d))) (*.f64 l l))))
	27.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (* (sqrt (exp (* (log (* l h)) -1))) d) (.f64 (neg.f64 d) (pow.f64 (.f64 l h) #s(literal -1/2 binary64)))))

Compiler

Compiled 7 146 to 2 168 computations (69.7% saved)

regimes297.0ms (2.3%)

Memory

6.8MiB live, 255.0MiB allocated; 28ms collecting garbage

Counts

107 → 3

Calls

Call 1

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

Outputs

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

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

Calls

7 calls:

67.0ms	D
46.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))))
46.0ms	M
43.0ms	d
39.0ms	h

Results

Accuracy	Segments	Branch
65.4%	1	`(*.f64 M D)`
69.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))))`
78.7%	3	`d`
78.6%	3	`h`
79.4%	3	`l`
65.4%	1	`M`
65.4%	1	`D`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes104.0ms (0.8%)

Memory

9.6MiB live, 101.8MiB allocated; 5ms collecting garbage

Counts

77 → 3

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

41.0ms	d
39.0ms	l
19.0ms	h

Results

Accuracy	Segments	Branch
77.6%	3	`h`
77.7%	3	`d`
78.4%	3	`l`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes91.0ms (0.7%)

Memory

-11.4MiB live, 86.8MiB allocated; 10ms collecting garbage

Counts

71 → 3

Calls

Call 1

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

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

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

Calls

3 calls:

36.0ms	d
33.0ms	l
17.0ms	h

Results

Accuracy	Segments	Branch
77.4%	3	`h`
75.7%	2	`d`
75.7%	2	`l`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes78.0ms (0.6%)

Memory

11.1MiB live, 57.1MiB allocated; 5ms collecting garbage

Counts

58 → 4

Calls

Call 1

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

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

Calls

3 calls:

45.0ms	h
15.0ms	l
15.0ms	d

Results

Accuracy	Segments	Branch
76.5%	4	`d`
73.8%	3	`l`
75.7%	4	`h`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes80.0ms (0.6%)

Memory

-15.8MiB live, 75.4MiB allocated; 6ms collecting garbage

Counts

49 → 3

Calls

Call 1

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

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

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

Calls

3 calls:

41.0ms	d
23.0ms	l
13.0ms	h

Results

Accuracy	Segments	Branch
72.0%	3	`l`
70.1%	4	`h`
76.5%	6	`d`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes37.0ms (0.3%)

Memory

2.6MiB live, 53.5MiB allocated; 7ms collecting garbage

Counts

47 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

21.0ms	d
12.0ms	l

Results

Accuracy	Segments	Branch
76.2%	6	`d`
70.0%	2	`l`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes36.0ms (0.3%)

Memory

4.3MiB live, 51.3MiB allocated; 3ms collecting garbage

Counts

30 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

18.0ms

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

8.0ms

Results

Accuracy	Segments	Branch
67.0%	3	`d`
66.0%	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))))`
67.9%	2	`l`

Compiler

Compiled 37 to 32 computations (13.5% saved)

regimes9.0ms (0.1%)

Memory

18.4MiB live, 18.4MiB allocated; 0ms collecting garbage

Counts

27 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

7.0ms

Results

Accuracy	Segments	Branch
67.9%	2	`l`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes70.0ms (0.5%)

Memory

-38.0MiB live, 106.8MiB allocated; 12ms collecting garbage

Counts

21 → 3

Calls

Call 1

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

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

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

Calls

7 calls:

25.0ms	d
13.0ms	l
8.0ms	(*.f64 M D)
6.0ms	D
6.0ms	M

Results

Accuracy	Segments	Branch
63.1%	3	`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))))`
59.9%	4	`h`
53.5%	1	`(*.f64 M D)`
57.3%	2	`M`
53.5%	1	`D`
62.3%	3	`l`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes7.0ms (0.1%)

Memory

13.7MiB live, 13.7MiB allocated; 0ms collecting garbage

Counts

19 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

6.0ms

Results

Accuracy	Segments	Branch
62.8%	3	`d`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes17.0ms (0.1%)

Memory

-16.1MiB live, 31.0MiB allocated; 1ms collecting garbage

Counts

16 → 4

Calls

Call 1

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

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

Calls

3 calls:

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

5.0ms

Results

Accuracy	Segments	Branch
60.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))))`
54.3%	3	`l`
51.7%	3	`d`

Compiler

Compiled 37 to 32 computations (13.5% saved)

regimes25.0ms (0.2%)

Memory

14.3MiB live, 59.9MiB allocated; 5ms collecting garbage

Counts

14 → 4

Calls

Call 1

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
49.7%	2	`(*.f64 M D)`
46.6%	2	`D`
51.3%	3	`h`
50.0%	2	`M`
56.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 41 to 43 computations (-4.9% saved)

regimes26.0ms (0.2%)

Memory

20.3MiB live, 65.9MiB allocated; 3ms collecting garbage

Counts

13 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

6.0ms	d
4.0ms	l
4.0ms	M
4.0ms	h
4.0ms	(*.f64 M D)

Results

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

Compiler

Compiled 42 to 48 computations (-14.3% saved)

regimes3.0ms (0%)

Memory

8.9MiB live, 8.9MiB allocated; 0ms collecting garbage

Counts

8 → 2

Calls

Call 1

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

Outputs

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

#s(approx (* (* (pow (/ d 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:

3.0ms

Results

Accuracy	Segments	Branch
48.9%	2	`l`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes44.0ms (0.3%)

Memory

-53.4MiB live, 16.4MiB allocated; 61ms collecting garbage

Counts

5 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

39.0ms	l
2.0ms	h
2.0ms	d

Results

Accuracy	Segments	Branch
47.1%	2	`h`
47.6%	2	`d`
47.5%	2	`l`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes13.0ms (0.1%)

Memory

34.7MiB live, 34.7MiB allocated; 0ms collecting garbage

Accuracy

Total -0.1b remaining (-0.1%)

Threshold costs -0.1b (-0.1%)

Counts

4 → 1

Calls

Call 1

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

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

Calls

7 calls:

2.0ms	D
2.0ms	l
2.0ms	h
2.0ms	d
2.0ms	M

Results

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

Compiler

Compiled 43 to 53 computations (-23.3% saved)

bsearch171.0ms (1.3%)

Memory

-40.4MiB live, 291.1MiB allocated; 29ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
87.0ms	9.864768495216682e+120	1.5579009420907142e+131
64.0ms	-2.159273976983885e-300	1.053471081920472e-286

Samples

71.0ms	346×	0	invalid
56.0ms	336×	0	valid

Compiler

Compiled 1 365 to 1 079 computations (21% saved)

Precisions

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

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

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

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

ival-sub: 9.0ms (8.8% of total)

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

exact: 1.0ms (1% of total)

adjust: 0.0ms (0% of total)

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

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

bsearch5.0ms (0%)

Memory

11.9MiB live, 11.9MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	9.864768495216682e+120	1.5579009420907142e+131
2.0ms	-2.159273976983885e-300	1.053471081920472e-286

Compiler

Compiled 1 442 to 1 112 computations (22.9% saved)

bsearch180.0ms (1.4%)

Memory

31.8MiB live, 296.8MiB allocated; 84ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
110.0ms	7.542171754688595e+245	1.9784296519286217e+251
48.0ms	-1.545668220653725e-296	-9.852326548283e-299

Samples

77.0ms	256×	0	valid
62.0ms	249×	0	invalid

Compiler

Compiled 1 449 to 1 041 computations (28.2% saved)

Precisions

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

ival-div: 49.0ms (40.7% of total)

ival-pow2: 33.0ms (27.4% of total)

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

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

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

exact: 1.0ms (0.8% of total)

adjust: 0.0ms (0% of total)

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

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

bsearch273.0ms (2.1%)

Memory

10.3MiB live, 389.5MiB allocated; 100ms collecting garbage

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
74.0ms	-1.551067331162273e-306	8.149936540788767e-307
89.0ms	-1.756067114025678e-105	-3.2805268121546423e-106
89.0ms	-1.959353022332152e+196	-9.17738610299224e+185

Samples

118.0ms	383×	0	valid
104.0ms	373×	0	invalid
0.0ms	1×	1	valid

Compiler

Compiled 2 096 to 1 486 computations (29.1% saved)

Precisions

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

ival-div: 70.0ms (48.9% of total)

ival-mult: 45.0ms (31.4% of total)

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

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

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

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

exact: 1.0ms (0.7% of total)

adjust: 0.0ms (0% of total)

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

bsearch76.0ms (0.6%)

Memory

7.7MiB live, 148.5MiB allocated; 21ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
25.0ms	9.864768495216682e+120	1.5579009420907142e+131
44.0ms	-7.407364789240611e+26	-2.244549420769199e+25

Samples

30.0ms	156×	0	invalid
26.0ms	160×	0	valid

Compiler

Compiled 1 470 to 988 computations (32.8% saved)

Precisions

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

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

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

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

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

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

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory

4.1MiB live, 4.1MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	9.864768495216682e+120	1.5579009420907142e+131

Compiler

Compiled 798 to 540 computations (32.3% saved)

bsearch7.0ms (0%)

Memory

11.2MiB live, 11.2MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
6.0ms	9.864768495216682e+120	1.5579009420907142e+131

Samples

2.0ms	16×	0	valid
1.0ms	7×	0	invalid

Compiler

Compiled 788 to 560 computations (28.9% saved)

Precisions

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

ival-div: 1.0ms (39.7% of total)

ival-mult: 1.0ms (39.7% of total)

ival-pow: 1.0ms (39.7% of total)

adjust: 0.0ms (0% of total)

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

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

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

exact: 0.0ms (0% of total)

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

bsearch29.0ms (0.2%)

Memory

-41.5MiB live, 4.3MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
29.0ms	9.864768495216682e+120	1.5579009420907142e+131

Compiler

Compiled 868 to 610 computations (29.7% saved)

bsearch111.0ms (0.8%)

Memory

33.3MiB live, 173.5MiB allocated; 15ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
51.0ms	2.0585048037337488e+114	5.942044305175993e+116
51.0ms	-1.757188969421161e+101	-1.583537195415912e+100

Samples

34.0ms	224×	0	valid
26.0ms	216×	0	invalid

Compiler

Compiled 1 356 to 952 computations (29.8% saved)

Precisions

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

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

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

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

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

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

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory

8.9MiB live, 8.9MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	2.0585048037337488e+114	5.942044305175993e+116
1.0ms	-1.757188969421161e+101	-1.583537195415912e+100

Compiler

Compiled 1 242 to 904 computations (27.2% saved)

bsearch1.0ms (0%)

Memory

2.3MiB live, 2.3MiB allocated; 0ms collecting garbage

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.737341702450215e+307	+inf
0.0ms	-0.0	8.910667147154103e-247
0.0ms	-1.320133988388078e-25	-2.729849987216258e-51

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory

2.3MiB live, 2.3MiB allocated; 0ms collecting garbage

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	1.737341702450215e+307	+inf
0.0ms	-0.0	8.910667147154103e-247
0.0ms	-4.0192606499391067e-66	-8.071076741283426e-104

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch62.0ms (0.5%)

Memory

-13.8MiB live, 75.1MiB allocated; 11ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
57.0ms	7.242233519846175e-261	1.847780871650147e-258

Samples

33.0ms	95×	0	invalid
17.0ms	112×	0	valid

Compiler

Compiled 591 to 429 computations (27.4% saved)

Precisions

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

ival-pow: 23.0ms (54% of total)

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

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

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

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

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

2.9MiB live, 2.9MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	7.242233519846175e-261	1.847780871650147e-258

Compiler

Compiled 654 to 436 computations (33.3% saved)

bsearch112.0ms (0.9%)

Memory

-6.0MiB live, 138.5MiB allocated; 71ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
106.0ms	-8.885305269235028e-166	-1.4942607908614483e-180

Samples

60.0ms	161×	0	invalid
30.0ms	160×	0	valid

Compiler

Compiled 908 to 600 computations (33.9% saved)

Precisions

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

ival-mult: 15.0ms (39.9% of total)

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

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

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

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

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

simplify93.0ms (0.7%)

Memory

20.7MiB live, 65.0MiB allocated; 9ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	252	1904
1	352	1904
2	706	1904
3	3575	1904

Stop Event

1×	node limit

Calls

Call 1

Inputs
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) h)) l))) (if (<=.f64 l #s(literal 155000000000000008035064434500672878318393995781752474576671720021945918815758360630134879927244490146712250414633401115964084322304 binary64)) (.f64 (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 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 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) h)) l))) (if (<=.f64 l #s(literal 155000000000000008035064434500672878318393995781752474576671720021945918815758360630134879927244490146712250414633401115964084322304 binary64)) (.f64 (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 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 l) (sqrt.f64 h))))))
(if (<=.f64 h #s(literal -4712544691453469/47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304860885586653967937772270969055149056096849908977391371752266308172471982589601097478449614615258949356272900190565812730839296826751014759649673012612226351104 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) h)) l))) (if (<=.f64 h #s(literal 125999999999999996417315074548756333222029373683688468230323249088641318195212781389738676388887188627068549984224566967728845235452096425060735708379021621813696221623797341214601499761995864564257581970446551350779498975451825252789909875694665465856 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)) d)) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) h)) l))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (/.f64 M d) M)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l)))))
(if (<=.f64 d #s(literal -2999999999999999821948872434989080586286993654907907791160344633252686654975316973700060284071985113015946095071730732992126144323268281169263054843209860589589939192446739029670127860711424 binary64)) #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))) (if (<=.f64 d #s(literal -3873374817130363/2582249878086908589655919172003011874329705792829223512830659356540647622016841194629645353280137831435903171972747493376 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) (.f64 #s(literal 1/2 binary64) h)) l))) (if (<=.f64 d #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)))) (fma.f64 (.f64 (.f64 (.f64 (/.f64 M d) M) (.f64 #s(literal 1/8 binary64) D)) D) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))) (.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)) d)) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) h)) l))))))
(if (<=.f64 l #s(literal -22999999999999998003511296 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (.f64 (.f64 (/.f64 M d) M) (.f64 #s(literal 1/8 binary64) D)) D) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))) (if (<=.f64 l #s(literal 124999999999999998853695925295159570460826106247810613998011528314708643958199954525130366748317696296200281646978747840623682781184 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) (.f64 #s(literal 1/2 binary64) h)) l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 124999999999999998853695925295159570460826106247810613998011528314708643958199954525130366748317696296200281646978747840623682781184 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) (.f64 #s(literal 1/2 binary64) h)) l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 130000000000000000383924010162745121770420754503467590761121560265914856434459688875964452278138828604618943108254523386513749704704 binary64)) (.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal -1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 130000000000000000383924010162745121770420754503467590761121560265914856434459688875964452278138828604618943108254523386513749704704 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(approx (* (* (/ (/ D d) 2) M) -1/2) (.f64 (.f64 (/.f64 D d) M) #s(literal -1/4 binary64)))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -16999999999999999687548481198199885520374802511651306369906205132529469537145924881711613414394036224 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (* (sqrt (exp (* (log (* l h)) -1))) d) (.f64 (neg.f64 d) (pow.f64 (.f64 l h) #s(literal -1/2 binary64))))) (if (<=.f64 d #s(literal 18600000000000000289405140008083280251388545982731742660677732796013508329664456080728728252419882526777436824141824 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (fma.f64 (.f64 h #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) l) (/.f64 (.f64 M (/.f64 M d)) d)) #s(literal 1 binary64)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (.f64 l h) #s(literal -1/2 binary64)) d))))
(if (<=.f64 d #s(literal -16999999999999999687548481198199885520374802511651306369906205132529469537145924881711613414394036224 binary64)) #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))) (if (<=.f64 d #s(literal 18600000000000000289405140008083280251388545982731742660677732796013508329664456080728728252419882526777436824141824 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (/ ( (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (fma.f64 (.f64 h #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) l) (/.f64 (.f64 M (/.f64 M d)) d)) #s(literal 1 binary64)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (.f64 l h) #s(literal -1/2 binary64)) 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 -8711228593176025/87112285931760246646623899502532662132736 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (/.f64 (.f64 D D) d) d)) (/.f64 (.f64 (.f64 M M) 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 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 (.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 19999999999999999720621195205129155434005283676252727750499321471767131705345487698129692828457921333572758560785309230786706345700504206672551904741230794021461383329378750357138079702146292679283246532142253440022040339106608037192915625377123894402342976922345843644278133859702564244005353335500042141696 binary64)) (.f64 #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) 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 -3794275180128377/948568795032094272909893509191171341133987714380927500611236528192824358010355712 binary64)) (.f64 (fma.f64 #s(approx ( -1/2 (pow (* (/ D 2) (/ M d)) 2)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M (/.f64 M d)) d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (/.f64 d h)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 19999999999999999720621195205129155434005283676252727750499321471767131705345487698129692828457921333572758560785309230786706345700504206672551904741230794021461383329378750357138079702146292679283246532142253440022040339106608037192915625377123894402342976922345843644278133859702564244005353335500042141696 binary64)) (.f64 #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))))))
(if (<=.f64 l #s(literal 4154677247100835/276978483140055660679575521154310658598553426872826080593424264214176807023660163124123274254828011726923049202224793480793868237276543994954010579940377664898144237780470377568655909939538265926807969022980227546033961457550130800932105433260772020185747203501713259671584768 binary64)) #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 4154677247100835/276978483140055660679575521154310658598553426872826080593424264214176807023660163124123274254828011726923049202224793480793868237276543994954010579940377664898144237780470377568655909939538265926807969022980227546033961457550130800932105433260772020185747203501713259671584768 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -1751977197166923/1167984798111281975972139931059274579172666497855631342228273284582214442805421410945513679697247078343332431250840168271536308408672112127552681297848886832192510636636227827221215793215130566656 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

Outputs
(if (<=.f64 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 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) h)) l))) (if (<=.f64 l #s(literal 155000000000000008035064434500672878318393995781752474576671720021945918815758360630134879927244490146712250414633401115964084322304 binary64)) (.f64 (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 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 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) h)) l))) (if (<=.f64 l #s(literal 155000000000000008035064434500672878318393995781752474576671720021945918815758360630134879927244490146712250414633401115964084322304 binary64)) (.f64 (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (pow.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 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 l) (sqrt.f64 h))))))
(if (<=.f64 h #s(literal -4712544691453469/47125446914534694131579097993419809976955095716785201420286055195012674566357244479460731079205201122720511132925006540350105785156086431086764996857554304860885586653967937772270969055149056096849908977391371752266308172471982589601097478449614615258949356272900190565812730839296826751014759649673012612226351104 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) h)) l))) (if (<=.f64 h #s(literal 125999999999999996417315074548756333222029373683688468230323249088641318195212781389738676388887188627068549984224566967728845235452096425060735708379021621813696221623797341214601499761995864564257581970446551350779498975451825252789909875694665465856 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)) d)) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) h)) l))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (/.f64 M d) M)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l)))))
(if (<=.f64 d #s(literal -2999999999999999821948872434989080586286993654907907791160344633252686654975316973700060284071985113015946095071730732992126144323268281169263054843209860589589939192446739029670127860711424 binary64)) #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))) (if (<=.f64 d #s(literal -3873374817130363/2582249878086908589655919172003011874329705792829223512830659356540647622016841194629645353280137831435903171972747493376 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) (.f64 #s(literal 1/2 binary64) h)) l))) (if (<=.f64 d #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)))) (fma.f64 (.f64 (.f64 (.f64 (/.f64 M d) M) (.f64 #s(literal 1/8 binary64) D)) D) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))) (.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)) d)) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (pow.f64 (.f64 (/.f64 D #s(literal 2 binary64)) (/.f64 M d)) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) h)) l))))))
(if (<=.f64 l #s(literal -22999999999999998003511296 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (.f64 (.f64 (/.f64 M d) M) (.f64 #s(literal 1/8 binary64) D)) D) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))) (if (<=.f64 l #s(literal 124999999999999998853695925295159570460826106247810613998011528314708643958199954525130366748317696296200281646978747840623682781184 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) (.f64 #s(literal 1/2 binary64) h)) l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 124999999999999998853695925295159570460826106247810613998011528314708643958199954525130366748317696296200281646978747840623682781184 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) (.f64 #s(literal 1/2 binary64) h)) l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 130000000000000000383924010162745121770420754503467590761121560265914856434459688875964452278138828604618943108254523386513749704704 binary64)) (.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(literal -1/2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 130000000000000000383924010162745121770420754503467590761121560265914856434459688875964452278138828604618943108254523386513749704704 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 (/.f64 D d) #s(literal 2 binary64)) M) #s(approx (* (* (/ (/ D d) 2) M) -1/2) (.f64 (.f64 (/.f64 D d) M) #s(literal -1/4 binary64)))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -16999999999999999687548481198199885520374802511651306369906205132529469537145924881711613414394036224 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #s(approx (* (sqrt (exp (* (log (* l h)) -1))) d) (.f64 (neg.f64 d) (pow.f64 (.f64 l h) #s(literal -1/2 binary64))))) (if (<=.f64 d #s(literal 18600000000000000289405140008083280251388545982731742660677732796013508329664456080728728252419882526777436824141824 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (fma.f64 (.f64 h #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) l) (/.f64 (.f64 M (/.f64 M d)) d)) #s(literal 1 binary64)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (.f64 l h) #s(literal -1/2 binary64)) d))))
(if (<=.f64 d #s(literal -16999999999999999687548481198199885520374802511651306369906205132529469537145924881711613414394036224 binary64)) #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))) (if (<=.f64 d #s(literal 18600000000000000289405140008083280251388545982731742660677732796013508329664456080728728252419882526777436824141824 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (/ ( (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (fma.f64 (.f64 h #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) l) (/.f64 (.f64 M (/.f64 M d)) d)) #s(literal 1 binary64)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (.f64 l h) #s(literal -1/2 binary64)) 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 -8711228593176025/87112285931760246646623899502532662132736 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (/ (* (pow (* (/ D 2) (/ M d)) 2) (* 1/2 h)) l)) (.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (/.f64 (.f64 D D) d) d)) (/.f64 (.f64 (.f64 M M) 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 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 (.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 19999999999999999720621195205129155434005283676252727750499321471767131705345487698129692828457921333572758560785309230786706345700504206672551904741230794021461383329378750357138079702146292679283246532142253440022040339106608037192915625377123894402342976922345843644278133859702564244005353335500042141696 binary64)) (.f64 #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) 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 -3794275180128377/948568795032094272909893509191171341133987714380927500611236528192824358010355712 binary64)) (.f64 (fma.f64 #s(approx ( -1/2 (pow (* (/ D 2) (/ M d)) 2)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M (/.f64 M d)) d))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (/.f64 d h)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 0 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 19999999999999999720621195205129155434005283676252727750499321471767131705345487698129692828457921333572758560785309230786706345700504206672551904741230794021461383329378750357138079702146292679283246532142253440022040339106608037192915625377123894402342976922345843644278133859702564244005353335500042141696 binary64)) (.f64 #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))))))
(if (<=.f64 l #s(literal 4154677247100835/276978483140055660679575521154310658598553426872826080593424264214176807023660163124123274254828011726923049202224793480793868237276543994954010579940377664898144237780470377568655909939538265926807969022980227546033961457550130800932105433260772020185747203501713259671584768 binary64)) #s(approx (* (+ (* (* -1/2 (pow (* (/ D 2) (/ M d)) 2)) (/ h l)) 1) (sqrt (* (/ d l) (/ d h)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 4154677247100835/276978483140055660679575521154310658598553426872826080593424264214176807023660163124123274254828011726923049202224793480793868237276543994954010579940377664898144237780470377568655909939538265926807969022980227546033961457550130800932105433260772020185747203501713259671584768 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -1751977197166923/1167984798111281975972139931059274579172666497855631342228273284582214442805421410945513679697247078343332431250840168271536308408672112127552681297848886832192510636636227827221215793215130566656 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

derivations575.0ms (4.4%)

Memory

-11.8MiB live, 543.1MiB allocated; 93ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 2 066 to 256 computations (87.6% saved)

preprocess209.0ms (1.6%)

Memory: 2.5MiB live, 285.1MiB allocated; 57ms collecting garbage
Compiler: Compiled 4 850 to 946 computations (80.5% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

start0.0ms (0%)

analyze504.0ms (3.8%)

sample5.9s (44.5%)

explain361.0ms (2.7%)

preprocess163.0ms (1.2%)

eval0.0ms (0%)

prune0.0ms (0%)

simplify137.0ms (1%)

localize62.0ms (0.5%)

series62.0ms (0.5%)

simplify279.0ms (2.1%)

rewrite136.0ms (1%)

eval10.0ms (0.1%)

prune37.0ms (0.3%)

simplify125.0ms (1%)

localize233.0ms (1.8%)

series148.0ms (1.1%)

simplify163.0ms (1.2%)

rewrite90.0ms (0.7%)

eval60.0ms (0.5%)

prune91.0ms (0.7%)

simplify108.0ms (0.8%)

localize310.0ms (2.4%)

series220.0ms (1.7%)

simplify124.0ms (0.9%)

rewrite108.0ms (0.8%)

eval79.0ms (0.6%)

prune56.0ms (0.4%)

simplify118.0ms (0.9%)

localize228.0ms (1.7%)

series133.0ms (1%)

simplify169.0ms (1.3%)

rewrite37.0ms (0.3%)

eval22.0ms (0.2%)

prune86.0ms (0.7%)

regimes297.0ms (2.3%)

regimes104.0ms (0.8%)

regimes91.0ms (0.7%)

regimes78.0ms (0.6%)

regimes80.0ms (0.6%)

regimes37.0ms (0.3%)

regimes36.0ms (0.3%)

regimes9.0ms (0.1%)

regimes70.0ms (0.5%)

regimes7.0ms (0.1%)

regimes17.0ms (0.1%)

regimes25.0ms (0.2%)

regimes26.0ms (0.2%)

regimes3.0ms (0%)

regimes44.0ms (0.3%)

regimes13.0ms (0.1%)

bsearch171.0ms (1.3%)

bsearch5.0ms (0%)

bsearch180.0ms (1.4%)

bsearch273.0ms (2.1%)

bsearch76.0ms (0.6%)

bsearch2.0ms (0%)

bsearch7.0ms (0%)

bsearch29.0ms (0.2%)

bsearch111.0ms (0.8%)

bsearch3.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch62.0ms (0.5%)

bsearch1.0ms (0%)

bsearch112.0ms (0.9%)

simplify93.0ms (0.7%)

derivations575.0ms (4.4%)

preprocess209.0ms (1.6%)

end0.0ms (0%)

Profiling