Metrics for Henrywood and Agarwal, Equation (12)

start0.0ms (0%)

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

analyze540.0ms (4.7%)

Memory

-24.4MiB live, 589.8MiB allocated; 75ms 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.1s (44.9%)

Memory

150.1MiB live, 5 823.4MiB allocated; 1.3s collecting garbage

Samples

2.2s	13 139×	0	invalid
1.5s	8 256×	0	valid

Precisions

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

ival-div: 896.0ms (31.9% of total)

ival-mult: 859.0ms (30.6% of total)

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

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

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

exact: 24.0ms (0.9% of total)

adjust: 7.0ms (0.2% of total)

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

Bogosity

explain402.0ms (3.5%)

Memory

-3.5MiB live, 519.2MiB allocated; 91ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
68	-	5	(-2.094940144254385e-47 -2.9463886477292917e+265 -2.0903413650756243e+148 -486762347401.8691 2.2446119251437247e+260)	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
58	-	4	(5.2346499390457676e-141 2.427951229946019e-251 4.803588338616935e+170 6.750160001483815e+152 -1.092737304344951e-66)	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
41	-	2	(6.787688360359194e-222 5.871782854408131e-127 8.292939795285831e+186 2.820515235356473e+31 5.697156164941015e-226)	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`
26	-	1	(-5.908117307909541e-233 -3.224517669180776e+36 -1.6563562859779083e+136 1.9806359886958367e-174 1.0778298537497736e+43)	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
16	-	1	(-1.9670539713104167e-8 -5.889116286214478e+95 -1.069958090521333e+59 -1.0611492679837145e-65 -3.2947890007671494e-250)	`(/.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 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	28	0
↳	`(/.f64 d h)`	overflow	28
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	27	0
↳	`(/.f64 d l)`	underflow	27
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	27	0
↳	`(/.f64 d l)`	overflow	27
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*uo**	12	0
↳	`(/.f64 d h)`	underflow	35
↳	`(/.f64 d l)`	underflow	27
↳	`(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))`	underflow	24
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	83
↳	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))`	overflow	83
↳	`(/.f64 h l)`	overflow	31
↳	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))`	overflow	87
↳	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	overflow	87
↳	`(*.f64 M D)`	overflow	30
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	41
`*.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 M D) (.f64 #s(literal 2 binary64) d))`	o/n	10	0
↳	`(*.f64 M D)`	overflow	30
`*.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**	8	0
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*nu**	5	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**	5	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	83
↳	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))`	overflow	83
↳	`(*.f64 M D)`	overflow	30
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	41
↳	`(/.f64 h l)`	underflow	31
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	u/n	1	0
↳	`(*.f64 M D)`	underflow	26

Confusion

	Predicted +	Predicted -
+	84	6
-	33	133

Precision

0.717948717948718

Recall

0.9333333333333333

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	84	0	6
-	33	0	133

Precision?

0.717948717948718

Recall?

0.9333333333333333

Freqs

test

number	freq
0	139
1	78
2	27
3	12

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

121.0ms

512×

valid

Compiler

Compiled 347 to 70 computations (79.8% saved)

Precisions

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

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

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

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

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

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

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

exact: 1.0ms (1.3% of total)

adjust: 0.0ms (0% of total)

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

preprocess168.0ms (1.5%)

Memory

26.7MiB live, 208.9MiB allocated; 29ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	171	588
1	546	580
2	2128	575
3	6640	575
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)) (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 M #s(literal 2 binary64)) D) D) #s(literal 1 binary64)) (/.f64 (/.f64 (/.f64 M d) #s(literal 2 binary64)) d)) #s(literal 1 binary64)) (pow.f64 (/.f64 d h) #s(literal 1/2 binary64))) (pow.f64 (/.f64 d l) #s(literal 1/2 binary64)))

Symmetry

(abs M)

(abs D)

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

prune1.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

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

series158.0ms (1.4%)

Memory

5.8MiB live, 191.2MiB allocated; 39ms collecting garbage

Counts

22 → 48

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

Calls

15 calls:

Time	Variable		Point	Expression
40.0ms	h	@	0	((* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (pow (/ d l) (/ 1 2)) (/ d l) l (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) M D (* 2 d) (/ h l))
39.0ms	M	@	inf	((* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (pow (/ d l) (/ 1 2)) (/ d l) l (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) M D (* 2 d) (/ h l))
11.0ms	D	@	0	((* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (pow (/ d l) (/ 1 2)) (/ d l) l (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) M D (* 2 d) (/ h l))
10.0ms	d	@	0	((* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (pow (/ d l) (/ 1 2)) (/ d l) l (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) M D (* 2 d) (/ h l))
9.0ms	d	@	inf	((* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (pow (/ d l) (/ 1 2)) (/ d l) l (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) M D (* 2 d) (/ h l))

rewrite60.0ms (0.5%)

Memory

-5.8MiB live, 85.1MiB allocated; 6ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	229	1681
0	254	1533
0	981	1518

Stop Event

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

Counts

70 → 102

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

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

eval13.0ms (0.1%)

Memory: 31.8MiB live, 31.8MiB allocated; 0ms collecting garbage
Compiler: Compiled 5 026 to 488 computations (90.3% saved)

prune81.0ms (0.7%)

Memory

-38.0MiB live, 110.7MiB allocated; 49ms collecting garbage

Pruning

18 alts after pruning (18 fresh and 0 done)

	Pruned	Kept	Total
New	100	18	118
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	101	18	119

Accuracy

93.2%

Counts

119 → 18

Alt Table

Click to see full alt table

Status	Accuracy	Program
	65.7%	(.f64 (pow.f64 (/.f64 d h) #s(literal 1/2 binary64)) (.f64 (pow.f64 (/.f64 d l) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64))))))
	54.3%	(.f64 (pow.f64 (.f64 (/.f64 d h) (/.f64 d l)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
▶	68.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
	54.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (pow (/ (* M D) (* 2 d)) 2) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D M) #s(literal 2 binary64))) (*.f64 d d)))) (/.f64 h l))))
	55.9%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (/.f64 (-.f64 l (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) h)) (.f64 d d))) l)))
▶	29.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)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (-.f64 (pow.f64 (.f64 M M) #s(literal -1 binary64)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 D D) h)) (.f64 (.f64 d d) l))) (.f64 M M))))
	39.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (-.f64 (pow.f64 (.f64 D D) #s(literal -1 binary64)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 M M) h)) (.f64 (.f64 d d) l))) (.f64 D D))))
	34.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	66.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
▶	64.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (exp.f64 (.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	35.1%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	37.9%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (.f64 #s(literal -1 binary64) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	32.7%	#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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) h) #s(literal -1 binary64)) #s(literal 1/2 binary64))) h (.f64 (.f64 (pow.f64 (pow.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) l) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d) h)))
▶	29.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) #s(literal -1 binary64)) d)) (pow.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1 binary64) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
	49.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 #s(literal -1/8 binary64) (/.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h))
	19.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 M M) d)) (pow.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))) #s(literal 1/2 binary64)) (.f64 (/.f64 d (.f64 D D)) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 D D)))
	23.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 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))
▶	25.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 (.f64 #s(literal -1 binary64) d) (pow.f64 (pow.f64 (*.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64))))

Compiler

Compiled 1 756 to 1 138 computations (35.2% saved)

series268.0ms (2.3%)

Memory

16.6MiB live, 489.6MiB allocated; 43ms collecting garbage

Counts

68 → 170

Calls

Call 1

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

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

Calls

15 calls:

Time	Variable		Point	Expression
43.0ms	l	@	0	((* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (pow (/ d l) (/ 1 2)) (/ d l) l (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M (/ D d) D 1/2 (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* -1 d) (pow (pow (* l h) -1) 1/2)) (* -1 d) -1 (pow (pow (* l h) -1) 1/2) (pow (* 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 (/ (* (pow (* D M) 2) -1) d)) (pow (/ h (pow l 3)) 1/2)) (* (* -1 d) (pow (pow (* l h) -1) 1/2))) (* -1/8 (/ (* (pow (* D M) 2) -1) d)) -1/8 (/ (* (pow (* D M) 2) -1) d) (* (pow (* D M) 2) -1) (pow (* D M) 2) (* D M) (pow (/ h (pow l 3)) 1/2) (/ h (pow l 3)) (pow l 3) 3 (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (exp (* (log (/ d l)) 1/2)) (* (log (/ d l)) 1/2) (log (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) (* 2 d) (/ h l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (- (pow (* M M) -1) (/ (* 1/8 (* (* D D) h)) (* (* d d) l))) (* M M)) (- (pow (* M M) -1) (/ (* 1/8 (* (* D D) h)) (* (* d d) l))) (pow (* M M) -1) (* M M) (/ (* 1/8 (* (* D D) h)) (* (* d d) l)) (* 1/8 (* (* D D) h)) 1/8 (* (* D D) h) (* D D) (* (* d d) l) (* d d))
43.0ms	d	@	0	((* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (pow (/ d l) (/ 1 2)) (/ d l) l (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M (/ D d) D 1/2 (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* -1 d) (pow (pow (* l h) -1) 1/2)) (* -1 d) -1 (pow (pow (* l h) -1) 1/2) (pow (* 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 (/ (* (pow (* D M) 2) -1) d)) (pow (/ h (pow l 3)) 1/2)) (* (* -1 d) (pow (pow (* l h) -1) 1/2))) (* -1/8 (/ (* (pow (* D M) 2) -1) d)) -1/8 (/ (* (pow (* D M) 2) -1) d) (* (pow (* D M) 2) -1) (pow (* D M) 2) (* D M) (pow (/ h (pow l 3)) 1/2) (/ h (pow l 3)) (pow l 3) 3 (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (exp (* (log (/ d l)) 1/2)) (* (log (/ d l)) 1/2) (log (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) (* 2 d) (/ h l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (- (pow (* M M) -1) (/ (* 1/8 (* (* D D) h)) (* (* d d) l))) (* M M)) (- (pow (* M M) -1) (/ (* 1/8 (* (* D D) h)) (* (* d d) l))) (pow (* M M) -1) (* M M) (/ (* 1/8 (* (* D D) h)) (* (* d d) l)) (* 1/8 (* (* D D) h)) 1/8 (* (* D D) h) (* D D) (* (* d d) l) (* d d))
24.0ms	l	@	-inf	((* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (pow (/ d l) (/ 1 2)) (/ d l) l (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M (/ D d) D 1/2 (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* -1 d) (pow (pow (* l h) -1) 1/2)) (* -1 d) -1 (pow (pow (* l h) -1) 1/2) (pow (* 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 (/ (* (pow (* D M) 2) -1) d)) (pow (/ h (pow l 3)) 1/2)) (* (* -1 d) (pow (pow (* l h) -1) 1/2))) (* -1/8 (/ (* (pow (* D M) 2) -1) d)) -1/8 (/ (* (pow (* D M) 2) -1) d) (* (pow (* D M) 2) -1) (pow (* D M) 2) (* D M) (pow (/ h (pow l 3)) 1/2) (/ h (pow l 3)) (pow l 3) 3 (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (exp (* (log (/ d l)) 1/2)) (* (log (/ d l)) 1/2) (log (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) (* 2 d) (/ h l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (- (pow (* M M) -1) (/ (* 1/8 (* (* D D) h)) (* (* d d) l))) (* M M)) (- (pow (* M M) -1) (/ (* 1/8 (* (* D D) h)) (* (* d d) l))) (pow (* M M) -1) (* M M) (/ (* 1/8 (* (* D D) h)) (* (* d d) l)) (* 1/8 (* (* D D) h)) 1/8 (* (* D D) h) (* D D) (* (* d d) l) (* d d))
24.0ms	d	@	-inf	((* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (pow (/ d l) (/ 1 2)) (/ d l) l (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M (/ D d) D 1/2 (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* -1 d) (pow (pow (* l h) -1) 1/2)) (* -1 d) -1 (pow (pow (* l h) -1) 1/2) (pow (* 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 (/ (* (pow (* D M) 2) -1) d)) (pow (/ h (pow l 3)) 1/2)) (* (* -1 d) (pow (pow (* l h) -1) 1/2))) (* -1/8 (/ (* (pow (* D M) 2) -1) d)) -1/8 (/ (* (pow (* D M) 2) -1) d) (* (pow (* D M) 2) -1) (pow (* D M) 2) (* D M) (pow (/ h (pow l 3)) 1/2) (/ h (pow l 3)) (pow l 3) 3 (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (exp (* (log (/ d l)) 1/2)) (* (log (/ d l)) 1/2) (log (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) (* 2 d) (/ h l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (- (pow (* M M) -1) (/ (* 1/8 (* (* D D) h)) (* (* d d) l))) (* M M)) (- (pow (* M M) -1) (/ (* 1/8 (* (* D D) h)) (* (* d d) l))) (pow (* M M) -1) (* M M) (/ (* 1/8 (* (* D D) h)) (* (* d d) l)) (* 1/8 (* (* D D) h)) 1/8 (* (* D D) h) (* D D) (* (* d d) l) (* d d))
21.0ms	l	@	inf	((* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (pow (/ d l) (/ 1 2)) (/ d l) l (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M (/ D d) D 1/2 (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* -1 d) (pow (pow (* l h) -1) 1/2)) (* -1 d) -1 (pow (pow (* l h) -1) 1/2) (pow (* 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 (/ (* (pow (* D M) 2) -1) d)) (pow (/ h (pow l 3)) 1/2)) (* (* -1 d) (pow (pow (* l h) -1) 1/2))) (* -1/8 (/ (* (pow (* D M) 2) -1) d)) -1/8 (/ (* (pow (* D M) 2) -1) d) (* (pow (* D M) 2) -1) (pow (* D M) 2) (* D M) (pow (/ h (pow l 3)) 1/2) (/ h (pow l 3)) (pow l 3) 3 (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (exp (* (log (/ d l)) 1/2)) (* (log (/ d l)) 1/2) (log (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) (* 2 d) (/ h l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (- (pow (* M M) -1) (/ (* 1/8 (* (* D D) h)) (* (* d d) l))) (* M M)) (- (pow (* M M) -1) (/ (* 1/8 (* (* D D) h)) (* (* d d) l))) (pow (* M M) -1) (* M M) (/ (* 1/8 (* (* D D) h)) (* (* d d) l)) (* 1/8 (* (* D D) h)) 1/8 (* (* D D) h) (* D D) (* (* d d) l) (* d d))

rewrite103.0ms (0.9%)

Memory

5.8MiB live, 142.8MiB allocated; 12ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	534	7053
0	631	6031
0	2197	5942

Stop Event

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

Counts

238 → 432

Calls

Call 1

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

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

eval96.0ms (0.8%)

Memory: 10.9MiB live, 111.8MiB allocated; 31ms collecting garbage
Compiler: Compiled 30 898 to 1 917 computations (93.8% saved)

prune190.0ms (1.7%)

Memory

12.3MiB live, 291.4MiB allocated; 25ms collecting garbage

Pruning

21 alts after pruning (19 fresh and 2 done)

	Pruned	Kept	Total
New	520	13	533
Fresh	7	6	13
Picked	3	2	5
Done	0	0	0
Total	530	21	551

Accuracy

93.3%

Counts

551 → 21

Alt Table

Click to see full alt table

Status	Accuracy	Program
	65.7%	(.f64 (pow.f64 (/.f64 d h) #s(literal 1/2 binary64)) (.f64 (pow.f64 (/.f64 d l) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (*.f64 (/.f64 D d) (/.f64 M #s(literal 2 binary64))) (/.f64 M #s(literal 2 binary64))) (/.f64 D d)))))))
	56.7%	(.f64 (pow.f64 (.f64 (/.f64 d h) (/.f64 d l)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
	68.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 D M) #s(literal 2 binary64)) d) (*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
	67.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (.f64 (/.f64 D d) (*.f64 (/.f64 D d) (/.f64 M #s(literal 2 binary64))))) #s(literal 1/2 binary64)) h) l)))
	43.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 D D)) (.f64 d d)) #s(literal 1/8 binary64))) l)))
▶	54.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (pow (/ (* M D) (* 2 d)) 2) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D M) #s(literal 2 binary64))) (*.f64 d d)))) (/.f64 h l))))
	34.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	14.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (-.f64 (pow.f64 (.f64 M M) #s(literal -1 binary64)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 D D) h)) (.f64 (.f64 d d) l))) (.f64 M M))))
▶	68.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
✓	64.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (exp.f64 (.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	66.4%	(.f64 (.f64 (exp.f64 (.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
▶	35.1%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	37.9%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (.f64 #s(literal -1 binary64) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	40.2%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
	32.7%	#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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) h) #s(literal -1 binary64)) #s(literal 1/2 binary64))) h (.f64 (.f64 (pow.f64 (pow.f64 (*.f64 (pow.f64 h #s(literal 3 binary64)) l) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d) h)))
✓	29.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) #s(literal -1 binary64)) d)) (pow.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1 binary64) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
▶	49.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 #s(literal -1/8 binary64) (/.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h))
	25.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 (.f64 #s(literal -1 binary64) d) (pow.f64 (/.f64 (pow.f64 h #s(literal -1 binary64)) l) #s(literal 1/2 binary64))))
	23.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1 binary64) d) #s(approx (pow (pow (* l h) -1) 1/2) (.f64 (.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))) #s(literal -1 binary64)))))
	38.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (*.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h))
▶	27.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 h #s(literal 3 binary64)) l) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) h))

Compiler

Compiled 1 999 to 1 283 computations (35.8% saved)

series374.0ms (3.3%)

Memory

-39.0MiB live, 406.5MiB allocated; 120ms collecting garbage

Counts

80 → 210

Calls

Call 1

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

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

Calls

15 calls:

Time	Variable		Point	Expression
65.0ms	d	@	0	((* (* (pow (/ d h) (/ 1 2)) (* (pow (/ d l) 1/4) (pow (/ d l) 1/4))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (* (pow (/ d l) 1/4) (pow (/ d l) 1/4))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (* (pow (/ d l) 1/4) (pow (/ d l) 1/4)) (pow (/ d l) 1/4) (/ d l) l 1/4 (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M (/ D d) D 1/2 (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (+ (* (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) -1/8) (* (pow (pow (* (pow h 3) l) -1) 1/2) d)) h) (+ (* (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) -1/8) (* (pow (pow (* (pow h 3) l) -1) 1/2) d)) (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) (pow (pow (* (pow l 3) h) -1) 1/2) (pow (* (pow l 3) h) -1) (* (pow l 3) h) (pow l 3) 3 -1 (* (* D D) (/ (* M M) d)) (* D D) (/ (* M M) d) (* M M) -1/8 (* (pow (pow (* (pow h 3) l) -1) 1/2) d) (pow (pow (* (pow h 3) l) -1) 1/2) (pow (* (pow h 3) l) -1) (* (pow h 3) l) (pow h 3) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) h) (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) (* -1/8 (/ (pow (* D M) 2) d)) (/ (pow (* D M) 2) d) (pow (* D M) 2) (* D M) (pow (pow (/ h l) 3) 1/2) (pow (/ h l) 3) (/ h l) (* (pow (/ h l) 1/2) d) (pow (/ h l) 1/2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (* (pow (pow (* l h) -1) 1/2) d) (pow (pow (* l h) -1) 1/2) (pow (* l h) -1) (* l h) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) (* 2 d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 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)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* 1/4 (pow (* D M) 2)) (* d d)) (* 1/4 (pow (* D M) 2)) (* d d))
33.0ms	d	@	inf	((* (* (pow (/ d h) (/ 1 2)) (* (pow (/ d l) 1/4) (pow (/ d l) 1/4))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (* (pow (/ d l) 1/4) (pow (/ d l) 1/4))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (* (pow (/ d l) 1/4) (pow (/ d l) 1/4)) (pow (/ d l) 1/4) (/ d l) l 1/4 (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M (/ D d) D 1/2 (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (+ (* (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) -1/8) (* (pow (pow (* (pow h 3) l) -1) 1/2) d)) h) (+ (* (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) -1/8) (* (pow (pow (* (pow h 3) l) -1) 1/2) d)) (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) (pow (pow (* (pow l 3) h) -1) 1/2) (pow (* (pow l 3) h) -1) (* (pow l 3) h) (pow l 3) 3 -1 (* (* D D) (/ (* M M) d)) (* D D) (/ (* M M) d) (* M M) -1/8 (* (pow (pow (* (pow h 3) l) -1) 1/2) d) (pow (pow (* (pow h 3) l) -1) 1/2) (pow (* (pow h 3) l) -1) (* (pow h 3) l) (pow h 3) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) h) (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) (* -1/8 (/ (pow (* D M) 2) d)) (/ (pow (* D M) 2) d) (pow (* D M) 2) (* D M) (pow (pow (/ h l) 3) 1/2) (pow (/ h l) 3) (/ h l) (* (pow (/ h l) 1/2) d) (pow (/ h l) 1/2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (* (pow (pow (* l h) -1) 1/2) d) (pow (pow (* l h) -1) 1/2) (pow (* l h) -1) (* l h) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) (* 2 d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 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)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* 1/4 (pow (* D M) 2)) (* d d)) (* 1/4 (pow (* D M) 2)) (* d d))
24.0ms	M	@	-inf	((* (* (pow (/ d h) (/ 1 2)) (* (pow (/ d l) 1/4) (pow (/ d l) 1/4))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (* (pow (/ d l) 1/4) (pow (/ d l) 1/4))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (* (pow (/ d l) 1/4) (pow (/ d l) 1/4)) (pow (/ d l) 1/4) (/ d l) l 1/4 (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M (/ D d) D 1/2 (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (+ (* (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) -1/8) (* (pow (pow (* (pow h 3) l) -1) 1/2) d)) h) (+ (* (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) -1/8) (* (pow (pow (* (pow h 3) l) -1) 1/2) d)) (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) (pow (pow (* (pow l 3) h) -1) 1/2) (pow (* (pow l 3) h) -1) (* (pow l 3) h) (pow l 3) 3 -1 (* (* D D) (/ (* M M) d)) (* D D) (/ (* M M) d) (* M M) -1/8 (* (pow (pow (* (pow h 3) l) -1) 1/2) d) (pow (pow (* (pow h 3) l) -1) 1/2) (pow (* (pow h 3) l) -1) (* (pow h 3) l) (pow h 3) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) h) (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) (* -1/8 (/ (pow (* D M) 2) d)) (/ (pow (* D M) 2) d) (pow (* D M) 2) (* D M) (pow (pow (/ h l) 3) 1/2) (pow (/ h l) 3) (/ h l) (* (pow (/ h l) 1/2) d) (pow (/ h l) 1/2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (* (pow (pow (* l h) -1) 1/2) d) (pow (pow (* l h) -1) 1/2) (pow (* l h) -1) (* l h) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) (* 2 d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 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)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* 1/4 (pow (* D M) 2)) (* d d)) (* 1/4 (pow (* D M) 2)) (* d d))
22.0ms	l	@	-inf	((* (* (pow (/ d h) (/ 1 2)) (* (pow (/ d l) 1/4) (pow (/ d l) 1/4))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (* (pow (/ d l) 1/4) (pow (/ d l) 1/4))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (* (pow (/ d l) 1/4) (pow (/ d l) 1/4)) (pow (/ d l) 1/4) (/ d l) l 1/4 (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M (/ D d) D 1/2 (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (+ (* (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) -1/8) (* (pow (pow (* (pow h 3) l) -1) 1/2) d)) h) (+ (* (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) -1/8) (* (pow (pow (* (pow h 3) l) -1) 1/2) d)) (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) (pow (pow (* (pow l 3) h) -1) 1/2) (pow (* (pow l 3) h) -1) (* (pow l 3) h) (pow l 3) 3 -1 (* (* D D) (/ (* M M) d)) (* D D) (/ (* M M) d) (* M M) -1/8 (* (pow (pow (* (pow h 3) l) -1) 1/2) d) (pow (pow (* (pow h 3) l) -1) 1/2) (pow (* (pow h 3) l) -1) (* (pow h 3) l) (pow h 3) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) h) (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) (* -1/8 (/ (pow (* D M) 2) d)) (/ (pow (* D M) 2) d) (pow (* D M) 2) (* D M) (pow (pow (/ h l) 3) 1/2) (pow (/ h l) 3) (/ h l) (* (pow (/ h l) 1/2) d) (pow (/ h l) 1/2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (* (pow (pow (* l h) -1) 1/2) d) (pow (pow (* l h) -1) 1/2) (pow (* l h) -1) (* l h) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) (* 2 d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 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)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* 1/4 (pow (* D M) 2)) (* d d)) (* 1/4 (pow (* D M) 2)) (* d d))
20.0ms	l	@	0	((* (* (pow (/ d h) (/ 1 2)) (* (pow (/ d l) 1/4) (pow (/ d l) 1/4))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (* (pow (/ d l) 1/4) (pow (/ d l) 1/4))) (pow (/ d h) (/ 1 2)) (/ d h) d h (/ 1 2) 1 2 (* (pow (/ d l) 1/4) (pow (/ d l) 1/4)) (pow (/ d l) 1/4) (/ d l) l 1/4 (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M (/ D d) D 1/2 (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (+ (* (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) -1/8) (* (pow (pow (* (pow h 3) l) -1) 1/2) d)) h) (+ (* (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) -1/8) (* (pow (pow (* (pow h 3) l) -1) 1/2) d)) (* (pow (pow (* (pow l 3) h) -1) 1/2) (* (* D D) (/ (* M M) d))) (pow (pow (* (pow l 3) h) -1) 1/2) (pow (* (pow l 3) h) -1) (* (pow l 3) h) (pow l 3) 3 -1 (* (* D D) (/ (* M M) d)) (* D D) (/ (* M M) d) (* M M) -1/8 (* (pow (pow (* (pow h 3) l) -1) 1/2) d) (pow (pow (* (pow h 3) l) -1) 1/2) (pow (* (pow h 3) l) -1) (* (pow h 3) l) (pow h 3) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) h) (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) (* -1/8 (/ (pow (* D M) 2) d)) (/ (pow (* D M) 2) d) (pow (* D M) 2) (* D M) (pow (pow (/ h l) 3) 1/2) (pow (/ h l) 3) (/ h l) (* (pow (/ h l) 1/2) d) (pow (/ h l) 1/2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (* (pow (pow (* l h) -1) 1/2) d) (pow (pow (* l h) -1) 1/2) (pow (* l h) -1) (* l h) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* M D) (* 2 d)) (* M D) (* 2 d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 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)) (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (pow (/ (* M D) (* 2 d)) 2) (/ (* 1/4 (pow (* D M) 2)) (* d d)) (* 1/4 (pow (* D M) 2)) (* d d))

rewrite115.0ms (1%)

Memory

47.7MiB live, 179.1MiB allocated; 17ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	620	9515
0	739	7905
0	2458	7836

Stop Event

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

Counts

290 → 526

Calls

Call 1

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

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

eval77.0ms (0.7%)

Memory: -36.2MiB live, 155.4MiB allocated; 27ms collecting garbage
Compiler: Compiled 37 219 to 2 421 computations (93.5% saved)

prune169.0ms (1.5%)

Memory

37.2MiB live, 325.9MiB allocated; 22ms collecting garbage

Pruning

22 alts after pruning (18 fresh and 4 done)

	Pruned	Kept	Total
New	587	8	595
Fresh	4	10	14
Picked	3	2	5
Done	0	2	2
Total	594	22	616

Accuracy

94.4%

Counts

616 → 22

Alt Table

Click to see full alt table

Status	Accuracy	Program
	65.7%	(.f64 (pow.f64 (/.f64 d h) #s(literal 1/2 binary64)) (.f64 (pow.f64 (/.f64 d l) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (.f64 (.f64 (*.f64 (/.f64 D d) (/.f64 M #s(literal 2 binary64))) (/.f64 M #s(literal 2 binary64))) (/.f64 D d)) #s(literal 1/2 binary64))))))
	56.7%	(.f64 (pow.f64 (.f64 (/.f64 d h) (/.f64 d l)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
	68.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 D M) #s(literal 2 binary64)) d) (*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
	67.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (.f64 (/.f64 D d) (*.f64 (/.f64 D d) (/.f64 M #s(literal 2 binary64))))) #s(literal 1/2 binary64)) h) l)))
▶	43.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) (.f64 D D)) (.f64 d d)) #s(literal 1/8 binary64))) l)))
	53.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
	34.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	14.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (-.f64 (pow.f64 (.f64 M M) #s(literal -1 binary64)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 D D) h)) (.f64 (.f64 d d) l))) (.f64 M M))))
✓	64.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (exp.f64 (.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
▶	68.4%	(.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) #s(literal 1/2 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
▶	66.4%	(.f64 (.f64 (exp.f64 (.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
✓	35.1%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	37.9%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (.f64 #s(literal -1 binary64) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	40.2%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (* (pow (/ d l) 1/4) (pow (/ d l) 1/4))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
✓	29.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) #s(literal -1 binary64)) d)) (pow.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1 binary64) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
	28.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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 l)) d)) h))
▶	56.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (*.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h))
	49.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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (.f64 (/.f64 h l) (.f64 (/.f64 h l) (/.f64 h l))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h))
	40.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 D M) #s(literal 1 binary64)) (pow.f64 (.f64 D M) #s(literal 1 binary64)))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 d d))) d)) h))
	25.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 (.f64 #s(literal -1 binary64) d) (pow.f64 (/.f64 (pow.f64 h #s(literal -1 binary64)) l) #s(literal 1/2 binary64))))
▶	23.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1 binary64) d) #s(approx (pow (pow (* l h) -1) 1/2) (.f64 (.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))) #s(literal -1 binary64)))))
✓	27.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 h #s(literal 3 binary64)) l) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) h))

Compiler

Compiled 2 056 to 1 283 computations (37.6% saved)

series489.0ms (4.3%)

Memory

3.0MiB live, 862.0MiB allocated; 73ms collecting garbage

Counts

68 → 196

Calls

Call 1

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

Outputs
#s(approx (* (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) (pow (/ d l) 1/4)) #s(hole binary64 (* d (sqrt (/ 1 (* h l))))))
#s(approx (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) #s(hole binary64 (* (sqrt (/ 1 h)) (exp (* 1/4 (+ (log (/ 1 l)) (* 3 (log d))))))))
#s(approx (pow (/ d h) 1/2) #s(hole binary64 (sqrt (/ d h))))
#s(approx (/ d h) #s(hole binary64 (/ d h)))
#s(approx d #s(hole binary64 d))
#s(approx (pow (/ d l) 1/4) #s(hole binary64 (exp (* 1/4 (+ (log d) (log (/ 1 l)))))))
#s(approx (/ d l) #s(hole binary64 (/ d l)))
#s(approx (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) #s(hole binary64 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))))
#s(approx (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) #s(hole binary64 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))))
#s(approx (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) #s(hole binary64 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) #s(hole binary64 (* 1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))))
#s(approx (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) #s(hole binary64 (* 1/4 (/ (* (pow D 2) (pow M 2)) (pow d 2)))))
#s(approx (* (/ M 2) (/ D d)) #s(hole binary64 (* 1/2 (/ (* D M) d))))
#s(approx (/ D d) #s(hole binary64 (/ 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 (* -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 d) (pow (pow (* l h) -1) 1/2)) #s(hole binary64 (* -1 (* d (sqrt (/ 1 (* h l)))))))
#s(approx (* -1 d) #s(hole binary64 (* -1 d)))
#s(approx (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) h) #s(hole binary64 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))))
#s(approx (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) 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/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3)))))))
#s(approx (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d)))
#s(approx (* -1/8 (/ (pow (* D M) 2) d)) #s(hole binary64 (* -1/8 (/ (* (pow D 2) (pow M 2)) d))))
#s(approx (/ (pow (* D M) 2) d) #s(hole binary64 (/ (* (pow D 2) (pow M 2)) d)))
#s(approx (* (pow (/ h l) 1/2) d) #s(hole binary64 (* d (sqrt (/ h l)))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) #s(hole binary64 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) #s(hole binary64 (* d (sqrt (/ 1 (* h l))))))
#s(approx (exp (* (log (/ d h)) 1/2)) #s(hole binary64 (sqrt (/ d h))))
#s(approx (* (log (/ d h)) 1/2) #s(hole binary64 (* 1/2 (+ (log d) (log (/ 1 h))))))
#s(approx (log (/ d h)) #s(hole binary64 (+ (log d) (log (/ 1 h)))))
#s(approx (pow (/ d l) (/ 1 2)) #s(hole binary64 (sqrt (/ d l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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))) #s(hole binary64 (* d (sqrt (/ 1 (* h l))))))
#s(approx (pow (/ d h) (/ 1 2)) #s(hole binary64 (sqrt (/ d h))))
#s(approx (* (/ (* (* (* M M) h) (* D D)) (* d d)) 1/8) #s(hole binary64 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))))
#s(approx (/ (* (* (* M M) h) (* D D)) (* d d)) #s(hole binary64 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2))))
#s(approx (* d d) #s(hole binary64 (pow d 2)))
#s(approx (* (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) #s(hole binary64 (* d (sqrt (/ 1 (* h l))))))
#s(approx (* (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) #s(hole binary64 (* (sqrt (/ 1 h)) (exp (* 1/4 (+ (log (/ 1 l)) (* -3 (log (/ 1 d)))))))))
#s(approx (pow (/ d l) 1/4) #s(hole binary64 (exp (* 1/4 (+ (log (/ 1 l)) (* -1 (log (/ 1 d))))))))
#s(approx (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) #s(hole binary64 1))
#s(approx (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) h) #s(hole binary64 (* d (sqrt (/ 1 (* h l))))))
#s(approx (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) 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/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (* d (sqrt (/ h l)))))
#s(approx (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) #s(hole binary64 (* d (sqrt (/ 1 (* h l))))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (* (log (/ d h)) 1/2) #s(hole binary64 (* 1/2 (+ (log (/ 1 h)) (* -1 (log (/ 1 d)))))))
#s(approx (log (/ d h)) #s(hole binary64 (+ (log (/ 1 h)) (* -1 (log (/ 1 d))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) (pow (/ d l) 1/4)) #s(hole binary64 (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))))
#s(approx (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) #s(hole binary64 (* (sqrt (/ 1 h)) (* (exp (* 1/4 (+ (log (/ -1 l)) (* -3 (log (/ -1 d)))))) (sqrt -1)))))
#s(approx (pow (/ d h) 1/2) #s(hole binary64 (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))))
#s(approx (pow (/ d l) 1/4) #s(hole binary64 (exp (* 1/4 (+ (log (/ -1 l)) (* -1 (log (/ -1 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 (* (* (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 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) h) #s(hole binary64 (* -1 (* 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 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) #s(hole binary64 (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) #s(hole binary64 (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))))
#s(approx (exp (* (log (/ d h)) 1/2)) #s(hole binary64 (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))))
#s(approx (* (log (/ d h)) 1/2) #s(hole binary64 (* 1/2 (+ (log (/ -1 h)) (* -1 (log (/ -1 d)))))))
#s(approx (log (/ d h)) #s(hole binary64 (+ (log (/ -1 h)) (* -1 (log (/ -1 d))))))
#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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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))) #s(hole binary64 (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h 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) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) #s(hole binary64 (* (pow (/ (* 1 (pow d 3)) l) 1/4) (sqrt (/ 1 h)))))
#s(approx h #s(hole binary64 h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) #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 (pow (* l h) -1) 1/2) #s(hole binary64 (sqrt (/ 1 (* h l)))))
#s(approx (* (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) -1) #s(hole binary64 (* -1 (sqrt (/ 1 (* h l))))))
#s(approx (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) #s(hole binary64 (sqrt (/ 1 (* h l)))))
#s(approx (pow (pow (* l h) -1) 1/4) #s(hole binary64 (exp (* 1/4 (+ (log (/ 1 l)) (* -1 (log h)))))))
#s(approx (pow (* l h) -1) #s(hole binary64 (/ 1 (* h l))))
#s(approx (* l h) #s(hole binary64 (* h l)))
#s(approx (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) 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/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))))
#s(approx (pow (/ h l) 3/2) #s(hole binary64 (sqrt (/ (pow h 3) (pow l 3)))))
#s(approx (/ h l) #s(hole binary64 (/ h l)))
#s(approx (pow (/ h l) 1/2) #s(hole binary64 (sqrt (/ h l))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (* (log (/ d h)) 1/2) #s(hole binary64 (* 1/2 (+ (log d) (* -1 (log h))))))
#s(approx (log (/ d h)) #s(hole binary64 (+ (log d) (* -1 (log h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (* (* (* M M) h) (* D D)) #s(hole binary64 (* (pow D 2) (* (pow M 2) h))))
#s(approx (* (* M M) h) #s(hole binary64 (* (pow M 2) h)))
#s(approx (* (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (pow (pow (* l h) -1) 1/4) #s(hole binary64 (exp (* 1/4 (+ (log (/ 1 h)) (log (/ 1 l)))))))
#s(approx (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) 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/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (* (pow h 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) (pow (/ d l) 1/4)) #s(hole binary64 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))))
#s(approx (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) #s(hole binary64 (* (pow (/ (* 1 (pow d 3)) l) 1/4) (* (sqrt (/ 1 h)) (pow (sqrt -1) 2)))))
#s(approx (pow (/ d h) 1/2) #s(hole binary64 (* (sqrt (/ d h)) (pow (sqrt -1) 2))))
#s(approx (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (* (* -1 d) (pow (pow (* l h) -1) 1/2)) #s(hole binary64 (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))))
#s(approx (pow (pow (* l h) -1) 1/2) #s(hole binary64 (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))
#s(approx (* (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) -1) #s(hole binary64 (* -1 (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
#s(approx (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) #s(hole binary64 (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))
#s(approx (pow (pow (* l h) -1) 1/4) #s(hole binary64 (exp (* 1/4 (+ (log (/ -1 h)) (log (/ -1 l)))))))
#s(approx (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) 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/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) 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 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3)))))))
#s(approx (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (* (pow h 2) (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 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 (/ h l) 3/2) #s(hole binary64 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))))
#s(approx (* (pow (/ h l) 1/2) d) #s(hole binary64 (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l))))))
#s(approx (pow (/ h l) 1/2) #s(hole binary64 (* -1 (* (sqrt (/ h l)) (pow (sqrt -1) 2)))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) #s(hole binary64 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))))
#s(approx (exp (* (log (/ d h)) 1/2)) #s(hole binary64 (* (sqrt (/ d h)) (pow (sqrt -1) 2))))
#s(approx (* (log (/ d h)) 1/2) #s(hole binary64 (* 1/2 (+ (log (* -1 d)) (log (/ -1 h))))))
#s(approx (log (/ d h)) #s(hole binary64 (+ (log (* -1 d)) (log (/ -1 h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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))) #s(hole binary64 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))))
#s(approx (pow (/ d h) (/ 1 2)) #s(hole binary64 (* (sqrt (/ d h)) (pow (sqrt -1) 2))))
#s(approx (* (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) #s(hole binary64 (* (sqrt (/ 1 h)) (exp (* 1/4 (+ (log (pow d 3)) (* -1 (log l))))))))
#s(approx (pow (/ d l) 1/4) #s(hole binary64 (exp (* 1/4 (+ (log d) (* -1 (log l)))))))
#s(approx l #s(hole binary64 l))
#s(approx (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (pow (pow (* l h) -1) 1/4) #s(hole binary64 (exp (* 1/4 (+ (log (/ 1 h)) (* -1 (log l)))))))
#s(approx (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) 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/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) #s(hole binary64 (* (sqrt (/ 1 h)) (exp (* 1/4 (+ (log (/ 1 l)) (log (pow d 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)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))))
#s(approx (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) 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 (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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/4)) #s(hole binary64 (* (sqrt (/ 1 h)) (exp (* 1/4 (+ (log (* -1 (pow d 3))) (log (/ -1 l))))))))
#s(approx (pow (/ d l) 1/4) #s(hole binary64 (exp (* 1/4 (+ (log (* -1 d)) (log (/ -1 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/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) h) #s(hole binary64 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))))
#s(approx (/ (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) 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/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l)))))
#s(approx (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l))))))
#s(approx (pow (/ h l) 3/2) #s(hole binary64 (* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))))
#s(approx (* (pow (/ h l) 1/2) d) #s(hole binary64 (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l)))))
#s(approx (pow (/ h l) 1/2) #s(hole binary64 (* (sqrt (/ h l)) (pow (sqrt -1) 2))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) #s(hole binary64 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ M 2) #s(hole binary64 (* 1/2 M)))
#s(approx M #s(hole binary64 M))
#s(approx (pow (* D M) 2) #s(hole binary64 (* (pow D 2) (pow M 2))))
#s(approx (* D M) #s(hole binary64 (* D M)))
#s(approx (* M M) #s(hole binary64 (pow M 2)))
#s(approx (* (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) 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/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 #s(hole binary64 D))
#s(approx (* D D) #s(hole binary64 (pow D 2)))
#s(approx (* (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) 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/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) #s(hole binary64 (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))))
#s(approx (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 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
90.0ms	d	@	-inf	((* (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d h) 1/2) (/ d h) d h 1/2 (pow (/ d l) 1/4) (/ d l) l 1/4 (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M 2 (/ D d) D (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* -1 d) (pow (pow (* l h) -1) 1/2)) (* -1 d) -1 (pow (pow (* l h) -1) 1/2) (* (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) -1) (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) (pow (pow (* l h) -1) 1/4) (pow (* 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 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) h) (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) (* -1/8 (/ (pow (* D M) 2) d)) -1/8 (/ (pow (* D M) 2) d) (pow (* D M) 2) (* D M) (pow (/ h l) 3/2) (/ h l) 3/2 (* (pow (/ h l) 1/2) d) (pow (/ h l) 1/2) (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (exp (* (log (/ d h)) 1/2)) (* (log (/ d h)) 1/2) (log (/ d h)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (/ (* (* (* M M) h) (* D D)) (* d d)) 1/8) (/ (* (* (* M M) h) (* D D)) (* d d)) (* (* (* M M) h) (* D D)) (* (* M M) h) (* M M) (* D D) (* d d) 1/8)
63.0ms	d	@	0	((* (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d h) 1/2) (/ d h) d h 1/2 (pow (/ d l) 1/4) (/ d l) l 1/4 (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M 2 (/ D d) D (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* -1 d) (pow (pow (* l h) -1) 1/2)) (* -1 d) -1 (pow (pow (* l h) -1) 1/2) (* (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) -1) (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) (pow (pow (* l h) -1) 1/4) (pow (* 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 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) h) (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) (* -1/8 (/ (pow (* D M) 2) d)) -1/8 (/ (pow (* D M) 2) d) (pow (* D M) 2) (* D M) (pow (/ h l) 3/2) (/ h l) 3/2 (* (pow (/ h l) 1/2) d) (pow (/ h l) 1/2) (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (exp (* (log (/ d h)) 1/2)) (* (log (/ d h)) 1/2) (log (/ d h)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (/ (* (* (* M M) h) (* D D)) (* d d)) 1/8) (/ (* (* (* M M) h) (* D D)) (* d d)) (* (* (* M M) h) (* D D)) (* (* M M) h) (* M M) (* D D) (* d d) 1/8)
52.0ms	d	@	inf	((* (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d h) 1/2) (/ d h) d h 1/2 (pow (/ d l) 1/4) (/ d l) l 1/4 (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M 2 (/ D d) D (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* -1 d) (pow (pow (* l h) -1) 1/2)) (* -1 d) -1 (pow (pow (* l h) -1) 1/2) (* (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) -1) (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) (pow (pow (* l h) -1) 1/4) (pow (* 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 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) h) (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) (* -1/8 (/ (pow (* D M) 2) d)) -1/8 (/ (pow (* D M) 2) d) (pow (* D M) 2) (* D M) (pow (/ h l) 3/2) (/ h l) 3/2 (* (pow (/ h l) 1/2) d) (pow (/ h l) 1/2) (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (exp (* (log (/ d h)) 1/2)) (* (log (/ d h)) 1/2) (log (/ d h)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (/ (* (* (* M M) h) (* D D)) (* d d)) 1/8) (/ (* (* (* M M) h) (* D D)) (* d d)) (* (* (* M M) h) (* D D)) (* (* M M) h) (* M M) (* D D) (* d d) 1/8)
45.0ms	h	@	0	((* (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d h) 1/2) (/ d h) d h 1/2 (pow (/ d l) 1/4) (/ d l) l 1/4 (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M 2 (/ D d) D (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* -1 d) (pow (pow (* l h) -1) 1/2)) (* -1 d) -1 (pow (pow (* l h) -1) 1/2) (* (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) -1) (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) (pow (pow (* l h) -1) 1/4) (pow (* 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 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) h) (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) (* -1/8 (/ (pow (* D M) 2) d)) -1/8 (/ (pow (* D M) 2) d) (pow (* D M) 2) (* D M) (pow (/ h l) 3/2) (/ h l) 3/2 (* (pow (/ h l) 1/2) d) (pow (/ h l) 1/2) (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (exp (* (log (/ d h)) 1/2)) (* (log (/ d h)) 1/2) (log (/ d h)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (/ (* (* (* M M) h) (* D D)) (* d d)) 1/8) (/ (* (* (* M M) h) (* D D)) (* d d)) (* (* (* M M) h) (* D D)) (* (* M M) h) (* M M) (* D D) (* d d) 1/8)
44.0ms	l	@	-inf	((* (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d l) 1/4)) (* (pow (/ d h) 1/2) (pow (/ d l) 1/4)) (pow (/ d h) 1/2) (/ d h) d h 1/2 (pow (/ d l) 1/4) (/ d l) l 1/4 (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) (* (/ M 2) (/ D d)) (/ M 2) M 2 (/ D d) D (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* -1 d) (pow (pow (* l h) -1) 1/2)) (* -1 d) -1 (pow (pow (* l h) -1) 1/2) (* (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) -1) (* (pow (pow (* l h) -1) 1/4) (pow (pow (* l h) -1) 1/4)) (pow (pow (* l h) -1) 1/4) (pow (* 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 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) h) (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (/ h l) 3/2)) (* (pow (/ h l) 1/2) d)) (* -1/8 (/ (pow (* D M) 2) d)) -1/8 (/ (pow (* D M) 2) d) (pow (* D M) 2) (* D M) (pow (/ h l) 3/2) (/ h l) 3/2 (* (pow (/ h l) 1/2) d) (pow (/ h l) 1/2) (* (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (exp (* (log (/ d h)) 1/2)) (pow (/ d l) (/ 1 2))) (exp (* (log (/ d h)) 1/2)) (* (log (/ d h)) 1/2) (log (/ d h)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (pow (/ d h) (/ 1 2)) (- 1 (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l)) (/ (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) l) (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (* (/ (* (* (* M M) h) (* D D)) (* d d)) 1/8) (/ (* (* (* M M) h) (* D D)) (* d d)) (* (* (* M M) h) (* D D)) (* (* M M) h) (* M M) (* D D) (* d d) 1/8)

rewrite132.0ms (1.2%)

Memory

-9.4MiB live, 173.3MiB allocated; 38ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	613	8509
0	705	6924
0	2496	6850

Stop Event

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

Counts

264 → 428

Calls

Call 1

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

eval84.0ms (0.7%)

Memory: -8.8MiB live, 132.6MiB allocated; 36ms collecting garbage
Compiler: Compiled 31 728 to 2 091 computations (93.4% saved)

prune187.0ms (1.6%)

Memory

-0.3MiB live, 333.8MiB allocated; 18ms collecting garbage

Pruning

22 alts after pruning (15 fresh and 7 done)

	Pruned	Kept	Total
New	570	3	573
Fresh	1	12	13
Picked	2	3	5
Done	0	4	4
Total	573	22	595

Accuracy

94.8%

Counts

595 → 22

Alt Table

Click to see full alt table

Status	Accuracy	Program
	65.7%	(.f64 (pow.f64 (/.f64 d h) #s(literal 1/2 binary64)) (.f64 (pow.f64 (/.f64 d l) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (.f64 (.f64 (*.f64 (/.f64 D d) (/.f64 M #s(literal 2 binary64))) (/.f64 M #s(literal 2 binary64))) (/.f64 D d)) #s(literal 1/2 binary64))))))
	56.7%	(.f64 (pow.f64 (.f64 (/.f64 d h) (/.f64 d l)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
	68.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 D M) #s(literal 2 binary64)) d) (*.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
	67.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (.f64 (/.f64 D d) (*.f64 (/.f64 D d) (/.f64 M #s(literal 2 binary64))))) #s(literal 1/2 binary64)) h) l)))
	57.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (* (* (* (/ M 2) (/ D d)) (* (/ M 2) (/ D d))) 1/2) h) (.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 (*.f64 M M) h) D) D) d) d) #s(literal 1/8 binary64))) l)))
	53.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (/.f64 d l) (/.f64 d l)) #s(literal 1/4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
	34.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	14.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (-.f64 (pow.f64 (.f64 M M) #s(literal -1 binary64)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 D D) h)) (.f64 (.f64 d d) l))) (.f64 M M))))
✓	64.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (exp.f64 (.f64 (log.f64 (/.f64 d l)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
✓	68.4%	(.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) #s(literal 1/2 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
✓	66.4%	(.f64 (.f64 (exp.f64 (.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
✓	35.1%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	37.9%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (.f64 #s(literal -1 binary64) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	40.2%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (* (pow (/ d l) 1/4) (pow (/ d l) 1/4))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l)))
✓	29.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) #s(literal -1 binary64)) d)) (pow.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal -1 binary64) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
	28.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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 l)) d)) h))
	56.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (.f64 (.f64 (pow.f64 (/.f64 h l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 h l) #s(literal 1/4 binary64))) d)) h))
	49.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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (.f64 (/.f64 h l) (.f64 (/.f64 h l) (/.f64 h l))) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h))
	40.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 D M) #s(literal 1 binary64)) (pow.f64 (.f64 D M) #s(literal 1 binary64)))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 d d))) d)) h))
	25.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 (.f64 (pow.f64 (pow.f64 (*.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d) #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 #s(literal -1 binary64) d) #s(approx (pow (pow (* l h) -1) 1/2) (.f64 (.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))) #s(literal -1 binary64)))))
✓	27.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 h #s(literal 3 binary64)) l) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) h))

Compiler

Compiled 3 334 to 1 026 computations (69.2% saved)

regimes123.0ms (1.1%)

Memory

40.0MiB live, 132.9MiB allocated; 4ms collecting garbage

Counts

43 → 3

Calls

Call 1

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

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

Calls

7 calls:

54.0ms	l
12.0ms	d
11.0ms	M
11.0ms	h
11.0ms	D

Results

Accuracy	Segments	Branch
68.4%	1	`(*.f64 M D)`
73.3%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
78.3%	5	`d`
72.5%	2	`h`
75.3%	3	`l`
68.4%	1	`M`
68.4%	1	`D`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes31.0ms (0.3%)

Memory

-29.2MiB live, 21.0MiB allocated; 28ms collecting garbage

Counts

32 → 3

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

9.0ms

Results

Accuracy	Segments	Branch
75.3%	3	`l`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes26.0ms (0.2%)

Memory

18.8MiB live, 66.6MiB allocated; 6ms collecting garbage

Counts

26 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

10.0ms

7.0ms

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

Compiler

Compiled 37 to 32 computations (13.5% saved)

regimes15.0ms (0.1%)

Memory

-17.9MiB live, 29.0MiB allocated; 2ms collecting garbage

Counts

23 → 2

Calls

Call 1

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

Outputs

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

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

Calls

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

Results

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

Compiler

Compiled 36 to 27 computations (25% saved)

regimes27.0ms (0.2%)

Memory

7.4MiB live, 53.7MiB allocated; 2ms collecting garbage

Counts

21 → 5

Calls

Call 1

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

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

Calls

4 calls:

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

Results

Accuracy	Segments	Branch
71.4%	2	`d`
73.2%	3	`h`
76.8%	5	`l`
71.3%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 38 to 37 computations (2.6% saved)

regimes8.0ms (0.1%)

Memory

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

Counts

20 → 4

Calls

Call 1

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

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

Calls

1 calls:

6.0ms

Results

Accuracy	Segments	Branch
75.1%	4	`l`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes43.0ms (0.4%)

Memory

-13.2MiB live, 83.3MiB allocated; 7ms collecting garbage

Counts

19 → 3

Calls

Call 1

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

Calls

7 calls:

8.0ms	l
7.0ms	M
6.0ms	h
6.0ms	d
5.0ms	D

Results

Accuracy	Segments	Branch
59.0%	2	`D`
56.6%	1	`(*.f64 M D)`
56.6%	1	`M`
58.5%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
68.8%	3	`d`
66.4%	2	`h`
68.2%	3	`l`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes17.0ms (0.2%)

Memory

-13.8MiB live, 33.0MiB allocated; 1ms collecting garbage

Counts

16 → 4

Calls

Call 1

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

Calls

3 calls:

6.0ms	l
5.0ms	h
5.0ms	d

Results

Accuracy	Segments	Branch
60.5%	3	`h`
58.9%	2	`l`
65.0%	4	`d`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes5.0ms (0%)

Memory

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

Counts

12 → 3

Calls

Call 1

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

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

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

Calls

1 calls:

4.0ms

Results

Accuracy	Segments	Branch
62.8%	3	`d`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes5.0ms (0%)

Memory

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

Counts

11 → 3

Calls

Call 1

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

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

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

Calls

1 calls:

4.0ms

Results

Accuracy	Segments	Branch
62.7%	3	`d`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes25.0ms (0.2%)

Memory

7.9MiB live, 54.8MiB allocated; 2ms collecting garbage

Counts

10 → 3

Calls

Call 1

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

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

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

Calls

7 calls:

5.0ms	l
3.0ms	h
3.0ms	M
3.0ms	d
3.0ms	D

Results

Accuracy	Segments	Branch
50.8%	2	`(*.f64 M D)`
49.2%	1	`M`
49.2%	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))))`
51.5%	2	`h`
54.8%	3	`l`
52.7%	2	`D`
56.7%	3	`d`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes719.0ms (6.3%)

Memory

-207.9MiB live, 43.0MiB allocated; 1.2s collecting garbage

Counts

9 → 3

Calls

Call 1

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

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

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

Calls

3 calls:

712.0ms	l
3.0ms	D
3.0ms	d

Results

Accuracy	Segments	Branch
48.0%	3	`D`
51.9%	4	`l`
54.0%	3	`d`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes29.0ms (0.3%)

Memory

-54.5MiB live, 34.4MiB allocated; 7ms collecting garbage

Counts

8 → 3

Calls

Call 1

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

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
48.1%	4	`l`
44.4%	2	`M`
41.8%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
40.5%	2	`(*.f64 M D)`
47.4%	5	`h`
49.9%	3	`d`

Compiler

Compiled 42 to 48 computations (-14.3% saved)

regimes3.0ms (0%)

Memory

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

Counts

6 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

2.0ms

Results

Accuracy	Segments	Branch
49.9%	3	`d`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes3.0ms (0%)

Memory

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

Counts

4 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

2.0ms

Results

Accuracy	Segments	Branch
49.9%	3	`d`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes6.0ms (0%)

Memory

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

Counts

3 → 2

Calls

Call 1

Inputs

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

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

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

Outputs

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

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

Calls

3 calls:

2.0ms	l
2.0ms	d
2.0ms	D

Results

Accuracy	Segments	Branch
42.7%	2	`l`
40.9%	2	`D`
44.8%	2	`d`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes18.0ms (0.2%)

Memory

-24.2MiB live, 23.1MiB allocated; 1ms collecting garbage

Counts

2 → 2

Calls

Call 1

Inputs

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

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

Outputs

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

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes8.0ms (0.1%)

Memory

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

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

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

Outputs

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 43 to 53 computations (-23.3% saved)

bsearch102.0ms (0.9%)

Memory

6.5MiB live, 195.3MiB allocated; 12ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
55.0ms	-6.83037367744018e-307	2.4734747563797705e-307
37.0ms	-1.743687691826462e-27	-4.290639907610729e-28

Samples

38.0ms	248×	0	invalid
36.0ms	224×	0	valid

Compiler

Compiled 1 338 to 892 computations (33.3% saved)

Precisions

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

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

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

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

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

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

exact: 1.0ms (1.8% of total)

adjust: 0.0ms (0% of total)

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

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

bsearch11.0ms (0.1%)

Memory

-25.5MiB live, 11.2MiB allocated; 11ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
9.0ms	-6.83037367744018e-307	2.4734747563797705e-307
1.0ms	-1.743687691826462e-27	-4.290639907610729e-28

Compiler

Compiled 1 362 to 904 computations (33.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.1981816373873267e+245	+inf

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.1981816373873267e+245	+inf

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch199.0ms (1.7%)

Memory

43.6MiB live, 279.1MiB allocated; 50ms collecting garbage

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
10.0ms	1.9771297868808162e+207	2.243023842390968e+207
63.0ms	2.740152851030186e-195	1.0519113322976564e-187
39.0ms	-6.83037367744018e-307	2.4734747563797705e-307
69.0ms	-2.0903413650756243e+148	-4.18564742818096e+145

Samples

77.0ms	416×	0	valid
76.0ms	350×	0	invalid

Compiler

Compiled 2 576 to 1 733 computations (32.7% saved)

Precisions

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

ival-mult: 37.0ms (33.5% of total)

ival-div: 35.0ms (31.7% of total)

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

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

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

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

exact: 1.0ms (0.9% of total)

adjust: 0.0ms (0% of total)

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

bsearch64.0ms (0.6%)

Memory

-3.4MiB live, 90.6MiB allocated; 6ms collecting garbage

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
0.0ms	1.9771297868808162e+207	2.243023842390968e+207
2.0ms	-6.83037367744018e-307	2.4734747563797705e-307
52.0ms	-1063679111366.187	-305557357.29747605

Samples

21.0ms	152×	0	invalid
21.0ms	128×	0	valid

Compiler

Compiled 2 036 to 1 354 computations (33.5% saved)

Precisions

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

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

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

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

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

ival-sub: 1.0ms (3.1% 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)

bsearch120.0ms (1%)

Memory

-7.8MiB live, 178.5MiB allocated; 16ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
56.0ms	4.561582911715674e+172	6.131171440685291e+179
51.0ms	-5.2197361327687645e-306	2.9427377760568497e-308

Samples

46.0ms	272×	0	valid
41.0ms	297×	0	invalid

Compiler

Compiled 1 969 to 1 301 computations (33.9% saved)

Precisions

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

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

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

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

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

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

exact: 1.0ms (1.5% of total)

adjust: 0.0ms (0% of total)

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

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

bsearch138.0ms (1.2%)

Memory

-1.7MiB live, 186.7MiB allocated; 34ms collecting garbage

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
2.0ms	4.561582911715674e+172	6.131171440685291e+179
60.0ms	8.795494272953248e+42	1.745709850217348e+50
59.0ms	-2.9436683174491624e+146	-1.3861227681888797e+143

Samples

57.0ms	305×	0	invalid
41.0ms	272×	0	valid

Compiler

Compiled 2 955 to 1 932 computations (34.6% saved)

Precisions

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

ival-div: 26.0ms (33.3% of total)

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

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

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

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

exact: 1.0ms (1.3% of total)

adjust: 0.0ms (0% of total)

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

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

bsearch82.0ms (0.7%)

Memory

-18.2MiB live, 93.7MiB allocated; 36ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
73.0ms	2.2348265201923767e+67	2.1372846776123935e+71
2.0ms	-2.9436683174491624e+146	-1.3861227681888797e+143

Samples

37.0ms	153×	0	invalid
26.0ms	128×	0	valid

Compiler

Compiled 1 734 to 1 126 computations (35.1% saved)

Precisions

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

ival-div: 28.0ms (60% of total)

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

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

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

ival-sub: 1.0ms (2.1% 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)

bsearch4.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	2.2348265201923767e+67	2.1372846776123935e+71
2.0ms	-2.9436683174491624e+146	-1.3861227681888797e+143

Compiler

Compiled 1 830 to 1 142 computations (37.6% saved)

bsearch34.0ms (0.3%)

Memory

3.6MiB live, 52.3MiB allocated; 5ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
29.0ms	3.79147838888872e+42	8.795494272953248e+42
2.0ms	-2.9436683174491624e+146	-1.3861227681888797e+143

Samples

12.0ms	80×	0	valid
8.0ms	67×	0	invalid

Compiler

Compiled 1 523 to 935 computations (38.6% saved)

Precisions

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

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

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

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

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

ival-pow2: 1.0ms (6.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)

bsearch49.0ms (0.4%)

Memory

-13.3MiB live, 80.6MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.79147838888872e+42	8.795494272953248e+42
43.0ms	-2.6279701651395606e-16	-4.3033102676437844e-19

Samples

22.0ms	128×	0	valid
12.0ms	99×	0	invalid

Compiler

Compiled 1 887 to 1 143 computations (39.4% saved)

Precisions

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

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

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

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

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

ival-sub: 1.0ms (4% 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)

bsearch115.0ms (1%)

Memory

19.7MiB live, 162.5MiB allocated; 9ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
64.0ms	5.2961972032394104e-11	94.54065998857243
38.0ms	-2.9436683174491624e+146	-1.3861227681888797e+143

Samples

43.0ms	272×	0	valid
37.0ms	301×	0	invalid

Compiler

Compiled 2 016 to 1 334 computations (33.8% saved)

Precisions

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

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

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

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

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

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

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

exact: 1.0ms (1.7% of total)

adjust: 0.0ms (0% of total)

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

bsearch14.0ms (0.1%)

Memory

-32.3MiB live, 14.0MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
8.0ms	5.2961972032394104e-11	94.54065998857243
2.0ms	-2.9436683174491624e+146	-1.3861227681888797e+143

Samples

3.0ms	23×	0	invalid
3.0ms	16×	0	valid

Compiler

Compiled 2 216 to 1 424 computations (35.7% saved)

Precisions

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

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

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

ival-pow: 1.0ms (26.5% 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)

bsearch4.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	5.2961972032394104e-11	94.54065998857243
2.0ms	-2.9436683174491624e+146	-1.3861227681888797e+143

Compiler

Compiled 2 216 to 1 424 computations (35.7% saved)

bsearch2.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
2.0ms	5.2961972032394104e-11	94.54065998857243

Compiler

Compiled 1 328 to 840 computations (36.7% saved)

bsearch49.0ms (0.4%)

Memory

6.8MiB live, 57.5MiB allocated; 5ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
44.0ms	1.1789628329333975e+145	2.4199866242245744e+146

Samples

18.0ms	117×	0	invalid
17.0ms	112×	0	valid

Compiler

Compiled 976 to 653 computations (33.1% saved)

Precisions

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

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

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

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

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

ival-sub: 1.0ms (4% 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)

simplify67.0ms (0.6%)

Memory

16.5MiB live, 62.3MiB allocated; 6ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	240	2652
1	315	2652
2	573	2652
3	2298	2652

Stop Event

1×	node limit

Calls

Call 1

Inputs
(if (<=.f64 l #s(literal -1742245718635205/1393796574908163946345982392040522594123776 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #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 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))))
(if (<=.f64 l #s(literal -1742245718635205/1393796574908163946345982392040522594123776 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #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 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 200000000000000008865591331916694877000857933217272512160395875661926954165237823719168356730340153384902021777125683944200820531246613453659458355377824296650910559620209942066205153823999633833272476105465504214545753911342860863491894855860224 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 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 200000000000000008865591331916694877000857933217272512160395875661926954165237823719168356730340153384902021777125683944200820531246613453659458355377824296650910559620209942066205153823999633833272476105465504214545753911342860863491894855860224 binary64)) (.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) #s(literal 1/2 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))))
(if (<=.f64 l #s(literal -145999999999999993415905483175107516209912639944309174414041490108519579720146523866951692924155277422977289366034686344022698587716004029690544128 binary64)) (.f64 (.f64 (exp.f64 (.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 l #s(literal -4807053516048627/25300281663413827294061918339864663381194581220517764794612669753428792445999418361495047962679640561898384733039601488923726092173224184608376674992592313740189678034570795170558363467761652042654970959809093133570250935428086587327262919456144944542601257064044846194041676826903812816523290938580750782913463467636686848 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 l #s(literal 5618431291326693/10032913020226237310869197622070557910061530690809581488606035047662224110216294903018315384440590765432325303757053790498770584583633048750167493382743608188543746320969475933440520778435368952314936164352 binary64)) (.f64 (.f64 (exp.f64 (.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 l #s(literal 2000000000000000077787155102176776862614744985904040266686047640153825885787697935261599312157554027746529206238824265827063412228188751233080367344425378807088691725252338870891329116153118924386444813271040 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(approx (* (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 l)) d)) h))))))
(if (<=.f64 l #s(literal -410000000000 binary64)) #s(approx (* (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 l #s(literal 2000000000000000077787155102176776862614744985904040266686047640153825885787697935261599312157554027746529206238824265827063412228188751233080367344425378807088691725252338870891329116153118924386444813271040 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(approx (* (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 l)) d)) h)))))
(if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 d #s(literal 2999999999999999987199177486354237933618652724452728344659418887204195861303795569761178530125722188357891447621706617367419187174047326399207129164799500190910591841572225024 binary64)) #s(approx (* (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 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 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -289999999999999982971899272216792389784688460836220892228035071597950893721799583243662732359143156577731078400609772571980895277162316631394746368 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 44000000000000000712272517764252458167063019520 binary64)) #s(approx ( (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) (if (<=.f64 d #s(literal 2999999999999999987199177486354237933618652724452728344659418887204195861303795569761178530125722188357891447621706617367419187174047326399207129164799500190910591841572225024 binary64)) #s(approx ( (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 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 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)))))
(if (<=.f64 d #s(literal -289999999999999982971899272216792389784688460836220892228035071597950893721799583243662732359143156577731078400609772571980895277162316631394746368 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 22000000000000000063196059527754314417137209861914299402661501236936704 binary64)) #s(approx ( (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -289999999999999982971899272216792389784688460836220892228035071597950893721799583243662732359143156577731078400609772571980895277162316631394746368 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 22000000000000000063196059527754314417137209861914299402661501236936704 binary64)) #s(approx ( (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (.f64 (.f64 (pow.f64 (/.f64 h l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 h l) #s(literal 1/4 binary64))) d)) h)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -280000000000000008035055907482716929863631311863572864210788734515574767857005550626400389803316133876204074409545021549917761168271008755049562112 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 7000000000000000468942493657203951861235712 binary64)) #s(approx ( (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (.f64 (/.f64 h l) (.f64 (/.f64 h l) (/.f64 h l))) #s(literal 1/2 binary64)) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -1166238552209971/5070602400912917605986812821504 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 7000000000000000468942493657203951861235712 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 D M) #s(literal 1 binary64)) (pow.f64 (.f64 D M) #s(literal 1 binary64)))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 d d))) d)) h)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -950000000000000065881124711356282270450946658672930944294121041983859545103662991043226681268179489422478766054329018043741413783326387322486784 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 4110347786689739/4835703278458516698824704 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -950000000000000065881124711356282270450946658672930944294121041983859545103662991043226681268179489422478766054329018043741413783326387322486784 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 4352132950612665/4835703278458516698824704 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1 binary64) d) #s(approx (pow (pow (* l h) -1) 1/2) (.f64 (.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))) #s(literal -1 binary64)))))))
(if (<=.f64 d #s(literal -950000000000000065881124711356282270450946658672930944294121041983859545103662991043226681268179489422478766054329018043741413783326387322486784 binary64)) #s(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) d) (pow.f64 (/.f64 (pow.f64 h #s(literal -1 binary64)) l) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 4352132950612665/4835703278458516698824704 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1 binary64) d) #s(approx (pow (pow (* l h) -1) 1/2) (.f64 (.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))) #s(literal -1 binary64)))))))
(if (<=.f64 d #s(literal 4352132950612665/4835703278458516698824704 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1 binary64) d) #s(approx (pow (pow (* l h) -1) 1/2) (.f64 (.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))) #s(literal -1 binary64))))))
(if (<=.f64 h #s(literal 189999999999999989608532542244330147673668766518374709649109067702331020071656162984364219905818102044713301325679389780922989584734916918217015296 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 h #s(literal 3 binary64)) l) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 h #s(literal 3 binary64)) l) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) h))

Outputs
(if (<=.f64 l #s(literal -1742245718635205/1393796574908163946345982392040522594123776 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #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 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))))
(if (<=.f64 l #s(literal -1742245718635205/1393796574908163946345982392040522594123776 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #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 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))))
(if (<=.f64 l #s(literal -1742245718635205/1393796574908163946345982392040522594123776 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #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 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))))
(if (<=.f64 l #s(literal -1742245718635205/1393796574908163946345982392040522594123776 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #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 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 200000000000000008865591331916694877000857933217272512160395875661926954165237823719168356730340153384902021777125683944200820531246613453659458355377824296650910559620209942066205153823999633833272476105465504214545753911342860863491894855860224 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 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 200000000000000008865591331916694877000857933217272512160395875661926954165237823719168356730340153384902021777125683944200820531246613453659458355377824296650910559620209942066205153823999633833272476105465504214545753911342860863491894855860224 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 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 200000000000000008865591331916694877000857933217272512160395875661926954165237823719168356730340153384902021777125683944200820531246613453659458355377824296650910559620209942066205153823999633833272476105465504214545753911342860863491894855860224 binary64)) (.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) #s(literal 1/2 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 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 200000000000000008865591331916694877000857933217272512160395875661926954165237823719168356730340153384902021777125683944200820531246613453659458355377824296650910559620209942066205153823999633833272476105465504214545753911342860863491894855860224 binary64)) (.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) #s(literal 1/2 binary64)) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (pow.f64 (/.f64 d l) #s(literal 1/4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))))
(if (<=.f64 l #s(literal -145999999999999993415905483175107516209912639944309174414041490108519579720146523866951692924155277422977289366034686344022698587716004029690544128 binary64)) (.f64 (.f64 (exp.f64 (.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 l #s(literal -4807053516048627/25300281663413827294061918339864663381194581220517764794612669753428792445999418361495047962679640561898384733039601488923726092173224184608376674992592313740189678034570795170558363467761652042654970959809093133570250935428086587327262919456144944542601257064044846194041676826903812816523290938580750782913463467636686848 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 l #s(literal 5618431291326693/10032913020226237310869197622070557910061530690809581488606035047662224110216294903018315384440590765432325303757053790498770584583633048750167493382743608188543746320969475933440520778435368952314936164352 binary64)) (.f64 (.f64 (exp.f64 (.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 l #s(literal 2000000000000000077787155102176776862614744985904040266686047640153825885787697935261599312157554027746529206238824265827063412228188751233080367344425378807088691725252338870891329116153118924386444813271040 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(approx (* (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 l)) d)) h))))))
(if (<=.f64 l #s(literal -145999999999999993415905483175107516209912639944309174414041490108519579720146523866951692924155277422977289366034686344022698587716004029690544128 binary64)) (.f64 (.f64 (exp.f64 (.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 l #s(literal -4807053516048627/25300281663413827294061918339864663381194581220517764794612669753428792445999418361495047962679640561898384733039601488923726092173224184608376674992592313740189678034570795170558363467761652042654970959809093133570250935428086587327262919456144944542601257064044846194041676826903812816523290938580750782913463467636686848 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 l #s(literal 5618431291326693/10032913020226237310869197622070557910061530690809581488606035047662224110216294903018315384440590765432325303757053790498770584583633048750167493382743608188543746320969475933440520778435368952314936164352 binary64)) (.f64 (.f64 (exp.f64 (.f64 (log.f64 (/.f64 d h)) #s(literal 1/2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 l #s(literal 2000000000000000077787155102176776862614744985904040266686047640153825885787697935261599312157554027746529206238824265827063412228188751233080367344425378807088691725252338870891329116153118924386444813271040 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(approx (* (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 l)) d)) h))))))
(if (<=.f64 l #s(literal -410000000000 binary64)) #s(approx (* (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 l #s(literal 2000000000000000077787155102176776862614744985904040266686047640153825885787697935261599312157554027746529206238824265827063412228188751233080367344425378807088691725252338870891329116153118924386444813271040 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(approx (* (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 l)) d)) h)))))
(if (<=.f64 l #s(literal -410000000000 binary64)) #s(approx (* (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) (if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 l #s(literal 2000000000000000077787155102176776862614744985904040266686047640153825885787697935261599312157554027746529206238824265827063412228188751233080367344425378807088691725252338870891329116153118924386444813271040 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(approx (* (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 l)) d)) h)))))
(if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 d #s(literal 2999999999999999987199177486354237933618652724452728344659418887204195861303795569761178530125722188357891447621706617367419187174047326399207129164799500190910591841572225024 binary64)) #s(approx (* (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 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 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (.f64 #s(literal -1 binary64) d) (.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) (/.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d)) (.f64 (/.f64 M #s(literal 2 binary64)) (/.f64 D d))) #s(literal 1/2 binary64)) h) l))) (if (<=.f64 d #s(literal 2999999999999999987199177486354237933618652724452728344659418887204195861303795569761178530125722188357891447621706617367419187174047326399207129164799500190910591841572225024 binary64)) #s(approx (* (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 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 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -289999999999999982971899272216792389784688460836220892228035071597950893721799583243662732359143156577731078400609772571980895277162316631394746368 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 44000000000000000712272517764252458167063019520 binary64)) #s(approx ( (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) (if (<=.f64 d #s(literal 2999999999999999987199177486354237933618652724452728344659418887204195861303795569761178530125722188357891447621706617367419187174047326399207129164799500190910591841572225024 binary64)) #s(approx ( (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (/.f64 (sqrt.f64 h) (sqrt.f64 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 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)))))
(if (<=.f64 d #s(literal -289999999999999982971899272216792389784688460836220892228035071597950893721799583243662732359143156577731078400609772571980895277162316631394746368 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 22000000000000000063196059527754314417137209861914299402661501236936704 binary64)) #s(approx ( (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -289999999999999982971899272216792389784688460836220892228035071597950893721799583243662732359143156577731078400609772571980895277162316631394746368 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 22000000000000000063196059527754314417137209861914299402661501236936704 binary64)) #s(approx ( (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (.f64 (.f64 (pow.f64 (/.f64 h l) #s(literal 1/4 binary64)) (pow.f64 (/.f64 h l) #s(literal 1/4 binary64))) d)) h)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -280000000000000008035055907482716929863631311863572864210788734515574767857005550626400389803316133876204074409545021549917761168271008755049562112 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 7000000000000000468942493657203951861235712 binary64)) #s(approx ( (* (pow (/ 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 (pow.f64 (.f64 D M) #s(literal 2 binary64)) d)) (pow.f64 (.f64 (/.f64 h l) (.f64 (/.f64 h l) (/.f64 h l))) #s(literal 1/2 binary64)) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -1166238552209971/5070602400912917605986812821504 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 7000000000000000468942493657203951861235712 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* -1/8 (/ (pow (* D M) 2) d)) (pow (pow (/ h l) 3) 1/2)) (* (pow (/ h l) 1/2) d)) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (.f64 D M) #s(literal 1 binary64)) (pow.f64 (.f64 D M) #s(literal 1 binary64)))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 d d))) d)) h)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -950000000000000065881124711356282270450946658672930944294121041983859545103662991043226681268179489422478766054329018043741413783326387322486784 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 4110347786689739/4835703278458516698824704 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -950000000000000065881124711356282270450946658672930944294121041983859545103662991043226681268179489422478766054329018043741413783326387322486784 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 4110347786689739/4835703278458516698824704 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d))))
(if (<=.f64 d #s(literal -950000000000000065881124711356282270450946658672930944294121041983859545103662991043226681268179489422478766054329018043741413783326387322486784 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 4352132950612665/4835703278458516698824704 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1 binary64) d) #s(approx (pow (pow (* l h) -1) 1/2) (.f64 (.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))) #s(literal -1 binary64)))))))
(if (<=.f64 d #s(literal -950000000000000065881124711356282270450946658672930944294121041983859545103662991043226681268179489422478766054329018043741413783326387322486784 binary64)) #s(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) d) (pow.f64 (pow.f64 (.f64 l h) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 4352132950612665/4835703278458516698824704 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1 binary64) d) #s(approx (pow (pow (* l h) -1) 1/2) (.f64 (.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))) #s(literal -1 binary64)))))))
(if (<=.f64 d #s(literal -950000000000000065881124711356282270450946658672930944294121041983859545103662991043226681268179489422478766054329018043741413783326387322486784 binary64)) #s(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) d) (pow.f64 (/.f64 (pow.f64 h #s(literal -1 binary64)) l) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 4352132950612665/4835703278458516698824704 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1 binary64) d) #s(approx (pow (pow (* l h) -1) 1/2) (.f64 (.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))) #s(literal -1 binary64)))))))
(if (<=.f64 d #s(literal -950000000000000065881124711356282270450946658672930944294121041983859545103662991043226681268179489422478766054329018043741413783326387322486784 binary64)) #s(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) d) (pow.f64 (/.f64 (pow.f64 h #s(literal -1 binary64)) l) #s(literal 1/2 binary64)))) (if (<=.f64 d #s(literal 4352132950612665/4835703278458516698824704 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1 binary64) d) #s(approx (pow (pow (* l h) -1) 1/2) (.f64 (.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))) #s(literal -1 binary64)))))))
(if (<=.f64 d #s(literal 4352132950612665/4835703278458516698824704 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1 binary64) d) #s(approx (pow (pow (* l h) -1) 1/2) (.f64 (.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))) #s(literal -1 binary64))))))
(if (<=.f64 d #s(literal 4352132950612665/4835703278458516698824704 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 #s(literal -1 binary64) d) #s(approx (pow (pow (* l h) -1) 1/2) (.f64 (.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))) #s(literal -1 binary64))))))
(if (<=.f64 h #s(literal 189999999999999989608532542244330147673668766518374709649109067702331020071656162984364219905818102044713301325679389780922989584734916918217015296 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 h #s(literal 3 binary64)) l) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) h)))
(if (<=.f64 h #s(literal 189999999999999989608532542244330147673668766518374709649109067702331020071656162984364219905818102044713301325679389780922989584734916918217015296 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (/.f64 h l) #s(literal 1/2 binary64)) d)) h)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 h #s(literal 3 binary64)) l) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) h)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (exp (* (log (/ d l)) 1/2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 h #s(literal 3 binary64)) l) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) h))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (fma.f64 (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) h) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 D D) (/.f64 (.f64 M M) d))) #s(literal -1/8 binary64) (.f64 (pow.f64 (pow.f64 (.f64 (pow.f64 h #s(literal 3 binary64)) l) #s(literal -1 binary64)) #s(literal 1/2 binary64)) d)) h))

derivations141.0ms (1.2%)

Memory

-25.1MiB live, 119.5MiB allocated; 14ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 3 009 to 241 computations (92% saved)

preprocess280.0ms (2.5%)

Memory: 28.7MiB live, 454.6MiB allocated; 44ms collecting garbage
Remove: (abs D)
Compiler: Compiled 11 288 to 2 346 computations (79.2% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze540.0ms (4.7%)

sample5.1s (44.9%)

explain402.0ms (3.5%)

preprocess168.0ms (1.5%)

eval0.0ms (0%)

prune1.0ms (0%)

series158.0ms (1.4%)

rewrite60.0ms (0.5%)

eval13.0ms (0.1%)

prune81.0ms (0.7%)

series268.0ms (2.3%)

rewrite103.0ms (0.9%)

eval96.0ms (0.8%)

prune190.0ms (1.7%)

series374.0ms (3.3%)

rewrite115.0ms (1%)

eval77.0ms (0.7%)

prune169.0ms (1.5%)

series489.0ms (4.3%)

rewrite132.0ms (1.2%)

eval84.0ms (0.7%)

prune187.0ms (1.6%)

regimes123.0ms (1.1%)

regimes31.0ms (0.3%)

regimes26.0ms (0.2%)

regimes15.0ms (0.1%)

regimes27.0ms (0.2%)

regimes8.0ms (0.1%)

regimes43.0ms (0.4%)

regimes17.0ms (0.2%)

regimes5.0ms (0%)

regimes5.0ms (0%)

regimes25.0ms (0.2%)

regimes719.0ms (6.3%)

regimes29.0ms (0.3%)

regimes3.0ms (0%)

regimes3.0ms (0%)

regimes6.0ms (0%)

regimes18.0ms (0.2%)

regimes8.0ms (0.1%)

bsearch102.0ms (0.9%)

bsearch11.0ms (0.1%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch199.0ms (1.7%)

bsearch64.0ms (0.6%)

bsearch120.0ms (1%)

bsearch138.0ms (1.2%)

bsearch82.0ms (0.7%)

bsearch4.0ms (0%)

bsearch34.0ms (0.3%)

bsearch49.0ms (0.4%)

bsearch115.0ms (1%)

bsearch14.0ms (0.1%)

bsearch4.0ms (0%)

bsearch2.0ms (0%)

bsearch49.0ms (0.4%)

simplify67.0ms (0.6%)

derivations141.0ms (1.2%)

preprocess280.0ms (2.5%)

end0.0ms (0%)

Profiling