Metrics for 2-ancestry mixing, positive discriminant

start0.0ms (0%)

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

analyze159.0ms (5%)

Memory

30.8MiB live, 210.5MiB allocated; 33ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.9%	0.1%	0%	0%	0%	0
0%	0%	99.9%	0.1%	0%	0%	0%	1
0%	0%	99.9%	0.1%	0%	0%	0%	2
0%	0%	99.9%	0.1%	0%	0%	0%	3
0%	0%	99.9%	0.1%	0%	0%	0%	4
0%	0%	99.9%	0.1%	0%	0%	0%	5
15.4%	12.5%	68.6%	0.1%	0%	18.7%	0%	6
23.1%	18.7%	62.4%	0.1%	0%	18.7%	0%	7
24%	18.7%	59.3%	0.1%	0%	21.8%	0%	8
41.9%	28.1%	39%	0.1%	0%	32.8%	0%	9
48.8%	32.8%	34.3%	0.1%	0%	32.8%	0%	10
50.6%	32.8%	32%	0.1%	0%	35.1%	0%	11
64.9%	38.2%	20.7%	0.1%	0%	41%	0%	12

Compiler

Compiled 39 to 21 computations (46.2% saved)

sample2.5s (77.9%)

Memory

59.5MiB live, 2 238.7MiB allocated; 844ms collecting garbage

Samples

1.8s	8 120×	1	valid
137.0ms	1 446×	0	invalid
16.0ms	136×	0	valid

Precisions

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

adjust: 562.0ms (36% of total)

ival-mult!: 324.0ms (20.8% of total)

ival-cbrt: 193.0ms (12.4% of total)

ival-sqrt: 150.0ms (9.6% of total)

ival-div!: 105.0ms (6.7% of total)

ival-add!: 90.0ms (5.8% of total)

ival-sub!: 89.0ms (5.7% of total)

ival-neg: 49.0ms (3.1% of total)

Bogosity

explain404.0ms (12.7%)

Memory

-18.6MiB live, 403.0MiB allocated; 173ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
145	0	-	0	-	`(sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))`
101	1	(2.2617775378646856e+245 6.650267703126916e-224 3.4535381669490738e+277)	3	(8.602095578041078e+72 -5.353744972749808e-21 -7.259561562938393e+200)	`(cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))))`
90	0	-	0	-	`(cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))))`
68	0	-	0	-	`(+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))`
62	1	(-3.3549804966176297e-217 -2.0479708824991842e-218 -2.961802408539952e-282)	0	-	`(-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))`
17	0	-	0	-	`(-.f64 (.f64 g g) (.f64 h h))`
15	0	-	1	(-1.1297126249822099e+122 6.944734692264688e-96 2.0721283625975737e-32)	`(.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))`
14	1	(1.915984609986982e+195 -1.8162469395370393e-171 -5.897088510530817e-215)	2	(4.5560890671716945e-7 6.022524438405204e-160 9.696050373723851e-90)	`(.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))`
0	0	-	0	-	`(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))`
0	0	-	0	-	`a`
0	0	-	0	-	`#s(literal 1 binary64)`
0	0	-	0	-	`(*.f64 #s(literal 2 binary64) a)`
0	0	-	0	-	`(+.f64 (cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))) (cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))))`
0	0	-	0	-	`(*.f64 h h)`
0	0	-	0	-	`(*.f64 g g)`
0	0	-	0	-	`(neg.f64 g)`
0	0	-	0	-	`#s(literal 2 binary64)`
0	0	-	0	-	`g`
0	0	-	0	-	`h`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`sqrt.f64`	`(sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))`	oflow-rescue	119	0
↳	`(-.f64 (.f64 g g) (.f64 h h))`	overflow	119
↳	`(*.f64 g g)`	overflow	119
↳	`(*.f64 h h)`	overflow	17
`cbrt.f64`	`(cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))))`	oflow-rescue	27	0
↳	`(.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))`	overflow	27
↳	`(*.f64 g g)`	overflow	119
↳	`(*.f64 h h)`	overflow	17
↳	`(-.f64 (.f64 g g) (.f64 h h))`	overflow	119
↳	`(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))`	overflow	1
`cbrt.f64`	`(cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))))`	oflow-rescue	26	0
↳	`(*.f64 g g)`	overflow	119
↳	`(*.f64 h h)`	overflow	17
↳	`(.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))`	overflow	26
↳	`(-.f64 (.f64 g g) (.f64 h h))`	overflow	119
↳	`(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))`	overflow	1
`-.f64`	`(-.f64 (.f64 g g) (.f64 h h))`	nan-rescue	17	0
↳	`(*.f64 g g)`	overflow	119
↳	`(*.f64 h h)`	overflow	17
`-.f64`	`(-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))`	cancellation	17	0
`+.f64`	`(+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))`	cancellation	17	0
`cbrt.f64`	`(cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))))`	uflow-rescue	11	0
↳	`(cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))))`	underflow	1
↳	`(.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))`	underflow	73
↳	`(-.f64 (.f64 g g) (.f64 h h))`	underflow	26
↳	`(*.f64 g g)`	underflow	26
↳	`(*.f64 h h)`	underflow	111
↳	`(+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))`	underflow	59
`cbrt.f64`	`(cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))))`	uflow-rescue	8	0
↳	`(-.f64 (.f64 g g) (.f64 h h))`	underflow	26
↳	`(*.f64 h h)`	underflow	111
↳	`(cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))))`	underflow	3
↳	`(.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))`	underflow	67
↳	`(*.f64 g g)`	underflow	26
↳	`(-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))`	underflow	65
`sqrt.f64`	`(sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))`	uflow-rescue	8	0
↳	`(-.f64 (.f64 g g) (.f64 h h))`	underflow	26
↳	`(*.f64 g g)`	underflow	26
↳	`(*.f64 h h)`	underflow	111
`*.f64`	`(.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))`	*no**	1	0

Confusion

	Predicted +	Predicted -
+	157	10
-	7	82

Precision

0.9573170731707317

Recall

0.9401197604790419

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	157	0	10
-	7	0	82

Precision?

0.9573170731707317

Recall?

0.9401197604790419

Freqs

test

number	freq
0	92
1	101
2	47
3	9
4	6
5	1

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

57.0ms	190×	2	valid
48.0ms	120×	3	valid
43.0ms	194×	1	valid
1.0ms	8×	0	valid

Compiler

Compiled 371 to 61 computations (83.6% saved)

Precisions

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

adjust: 30.0ms (28.5% of total)

ival-mult!: 25.0ms (23.7% of total)

ival-cbrt: 15.0ms (14.2% of total)

ival-sqrt: 14.0ms (13.3% of total)

ival-sub!: 7.0ms (6.6% of total)

ival-add!: 7.0ms (6.6% of total)

ival-div!: 6.0ms (5.7% of total)

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

preprocess34.0ms (1.1%)

Memory

-37.3MiB live, 10.1MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	84	325
1	263	325
2	837	319
3	2951	319

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	37.7%	(+.f64 (cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))) (cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))))

Status

Accuracy

Program

▶

37.7%

(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))))

Symmetry

(abs h)

Compiler

Compiled 74 to 38 computations (48.6% saved)

series91.0ms (2.9%)

Memory

9.5MiB live, 100.6MiB allocated; 7ms collecting garbage

Counts

19 → 200

Calls

Call 1

Inputs
(+.f64 (cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))) (cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))))
(cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))
#s(literal 1 binary64)
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
a
(+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))
(neg.f64 g)
g
(sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))
(-.f64 (.f64 g g) (.f64 h h))
(*.f64 g g)
(*.f64 h h)
h
(cbrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h)))))
(-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (.f64 g g) (.f64 h h))))

Outputs
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* g (+ (* -1/3 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (cbrt 1/2))) (* 1/3 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (cbrt -1/2))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* g (+ (* -1/3 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (cbrt 1/2))) (+ (* 1/3 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (cbrt -1/2))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ 1 (* a (* h (sqrt -1))))) (* 1/3 (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ 1 (* a (* h (sqrt -1))))) (* 1/3 (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* g (+ (* -1/3 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (cbrt 1/2))) (+ (* 1/3 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (cbrt -1/2))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ 1 (* a (* h (sqrt -1))))) (* 1/3 (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ 1 (* a (* h (sqrt -1))))) (* 1/3 (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9)))))) (* g (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ (* 1/27 (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))))) (* 2/3 (* (pow (/ 1 (* (pow a 4) (* (pow h 5) (pow (sqrt -1) 5)))) 1/9) (- (* 1/2 (/ 1 (* a (* h (sqrt -1))))) (* 1/3 (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9))))))))) (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* -2/3 (* (pow (/ 1 (* (pow a 4) (* (pow h 5) (pow (sqrt -1) 5)))) 1/9) (- (* 1/2 (/ 1 (* a (* h (sqrt -1))))) (* 1/3 (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9))))) (* -1/27 (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))))))))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* -1/3 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* g (cbrt 1/2)))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* g (+ (* -1/3 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (cbrt 1/2))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt 1/2) (- (* 1/2 (/ 1 (* a (* h (sqrt -1))))) (* 1/3 (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9))))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* g (+ (* -1/3 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (cbrt 1/2))) (* g (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt 1/2) (+ (* -2/3 (* (pow (/ 1 (* (pow a 4) (* (pow h 5) (pow (sqrt -1) 5)))) 1/9) (- (* 1/2 (/ 1 (* a (* h (sqrt -1))))) (* 1/3 (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9))))) (* -1/27 (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ 1 (* a (* h (sqrt -1))))) (* 1/3 (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9)))))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* 1/2 (/ (* h (sqrt -1)) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (+ (* -1/2 (/ g a)) (* 1/2 (/ (* h (sqrt -1)) a)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (+ (* 1/2 (/ (* h (sqrt -1)) a)) (* g (- (* 1/4 (/ g (* a (* h (sqrt -1))))) (* 1/2 (/ 1 a)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (+ (* 1/2 (/ (* h (sqrt -1)) a)) (* g (- (* g (+ (* -1/16 (/ (pow g 2) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (* 1/4 (/ 1 (* a (* h (sqrt -1))))))) (* 1/2 (/ 1 a)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (+ (* -1 g) (* h (sqrt -1)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (+ (* g (- (* 1/2 (/ g (* h (sqrt -1)))) 1)) (* h (sqrt -1)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (+ (* g (- (* g (+ (* -1/8 (/ (pow g 2) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ 1 (* h (sqrt -1)))))) 1)) (* h (sqrt -1)))))
#s(approx (neg g) #s(hole binary64 (* -1 g)))
#s(approx g #s(hole binary64 g))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (+ (* 1/2 (/ (pow g 2) (* h (sqrt -1)))) (* h (sqrt -1)))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (+ (* h (sqrt -1)) (* (pow g 2) (+ (* -1/8 (/ (pow g 2) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ 1 (* h (sqrt -1)))))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (+ (* h (sqrt -1)) (* (pow g 2) (+ (* (pow g 2) (- (* 1/16 (/ (pow g 2) (* (pow h 5) (pow (sqrt -1) 5)))) (* 1/8 (/ 1 (* (pow h 3) (pow (sqrt -1) 3)))))) (* 1/2 (/ 1 (* h (sqrt -1)))))))))
#s(approx (- (* g g) (* h h)) #s(hole binary64 (* -1 (pow h 2))))
#s(approx (- (* g g) (* h h)) #s(hole binary64 (- (pow g 2) (pow h 2))))
#s(approx (* g g) #s(hole binary64 (pow g 2)))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* 1/3 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* g (cbrt -1/2)))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt -1/2) (- (* 1/2 (/ 1 (* a (* h (sqrt -1))))) (* 1/3 (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9))))))) (* 1/3 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (cbrt -1/2))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (cbrt -1/2))) (* g (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt -1/2) (+ (* 1/27 (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))))) (* 2/3 (* (pow (/ 1 (* (pow a 4) (* (pow h 5) (pow (sqrt -1) 5)))) 1/9) (- (* 1/2 (/ 1 (* a (* h (sqrt -1))))) (* 1/3 (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9)))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ 1 (* a (* h (sqrt -1))))) (* 1/3 (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9)))))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1/2 (/ (* h (sqrt -1)) a))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (+ (* -1/2 (/ g a)) (* -1/2 (/ (* h (sqrt -1)) a)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (+ (* -1/2 (/ (* h (sqrt -1)) a)) (* g (- (* -1/4 (/ g (* a (* h (sqrt -1))))) (* 1/2 (/ 1 a)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (+ (* -1/2 (/ (* h (sqrt -1)) a)) (* g (- (* g (- (* 1/16 (/ (pow g 2) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (* 1/4 (/ 1 (* a (* h (sqrt -1))))))) (* 1/2 (/ 1 a)))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (- (* -1 g) (* h (sqrt -1)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (- (* g (- (* -1/2 (/ g (* h (sqrt -1)))) 1)) (* h (sqrt -1)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (- (* g (- (* g (- (* 1/8 (/ (pow g 2) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ 1 (* h (sqrt -1)))))) 1)) (* h (sqrt -1)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* g (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (pow h 2) (* a (pow g 4)))) (* (cbrt -1/2) (cbrt 1/2)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* g (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (* (pow h 2) (cbrt -1/2)) (pow (cbrt 2) 2)))) (+ (* -1/24 (* (cbrt (/ (pow h 8) (* a (pow g 10)))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (pow h 2) (* a (pow g 4)))) (* (cbrt -1/2) (cbrt 1/2)))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* g (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (* (pow h 2) (cbrt -1/2)) (pow (cbrt 2) 2)))) (+ (* -1/24 (* (cbrt (/ 1 (* a (pow g 14)))) (/ (* (pow h 4) (cbrt -1/2)) (pow (cbrt 2) 2)))) (+ (* -1/24 (* (cbrt (/ (pow h 8) (* a (pow g 10)))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))) (+ (* -1/48 (* (cbrt (/ (pow h 14) (* a (pow g 16)))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (pow h 2) (* a (pow g 4)))) (* (cbrt -1/2) (cbrt 1/2)))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1/2) (cbrt 1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* -1/24 (* (cbrt (/ (pow h 8) (* a (pow g 7)))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1/2) (cbrt 1/2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* -1/24 (* (cbrt (/ (pow h 8) (* a (pow g 7)))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))) (+ (* -1/48 (* (cbrt (/ (pow h 14) (* a (pow g 13)))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1/2) (cbrt 1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* -1/24 (* (cbrt (/ (pow h 8) (* a (pow g 7)))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))) (+ (* -1/48 (* (cbrt (/ (pow h 14) (* a (pow g 13)))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))) (+ (* -1/576 (* (cbrt (/ (pow h 14) (* a (pow g 13)))) (/ (cbrt 1/2) (pow (cbrt -1/2) 5)))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1/2) (cbrt 1/2))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1/4 (/ (pow h 2) (* a g)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (/ (+ (* -1/4 (/ (pow h 2) a)) (* -1/16 (/ (pow h 4) (* a (pow g 2))))) g)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (/ (+ (* -1/4 (/ (pow h 2) a)) (+ (* -1/16 (/ (pow h 4) (* a (pow g 2)))) (* -1/32 (/ (pow h 6) (* a (pow g 4)))))) g)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (/ (+ (* -1/4 (/ (+ (* 1/64 (pow h 8)) (* 1/16 (pow h 8))) (* a (pow g 6)))) (+ (* -1/4 (/ (pow h 2) a)) (+ (* -1/16 (/ (pow h 4) (* a (pow g 2)))) (* -1/32 (/ (pow h 6) (* a (pow g 4))))))) g)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1/2 (/ (pow h 2) g))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (/ (+ (* -1/2 (pow h 2)) (* -1/8 (/ (pow h 4) (pow g 2)))) g)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (/ (+ (* -1/2 (pow h 2)) (+ (* -1/8 (/ (pow h 4) (pow g 2))) (* -1/16 (/ (pow h 6) (pow g 4))))) g)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow h 8)) (* 1/16 (pow h 8))) (pow g 6))) (+ (* -1/2 (pow h 2)) (+ (* -1/8 (/ (pow h 4) (pow g 2))) (* -1/16 (/ (pow h 6) (pow g 4)))))) g)))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 g))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* g (+ 1 (* -1/2 (/ (pow h 2) (pow g 2)))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* g (+ 1 (+ (* -1/2 (/ (pow h 2) (pow g 2))) (* -1/8 (/ (pow h 4) (pow g 4))))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* g (+ 1 (+ (* -1/2 (/ (pow h 2) (pow g 2))) (+ (* -1/8 (/ (pow h 4) (pow g 4))) (* -1/16 (/ (pow h 6) (pow g 6)))))))))
#s(approx (- (* g g) (* h h)) #s(hole binary64 (pow g 2)))
#s(approx (- (* g g) (* h h)) #s(hole binary64 (* (pow g 2) (+ 1 (* -1 (/ (pow h 2) (pow g 2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* g (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (* (pow h 2) (cbrt -1/2)) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* g (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (* (pow h 2) (cbrt -1/2)) (pow (cbrt 2) 2)))) (+ (* -1/24 (* (cbrt (/ 1 (* a (pow g 14)))) (/ (* (pow h 4) (cbrt -1/2)) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* g (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (* (pow h 2) (cbrt -1/2)) (pow (cbrt 2) 2)))) (+ (* -1/24 (* (cbrt (/ 1 (* a (pow g 14)))) (/ (* (pow h 4) (cbrt -1/2)) (pow (cbrt 2) 2)))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow g 20))) (/ (* (cbrt -1/2) (- (* -1/16 (/ (pow h 6) a)) (* 1/12 (/ (* (pow g 2) (pow h 4)) (* a (pow (cbrt 2) 3)))))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2)))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (/ g a))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* g (- (* 1/4 (/ (pow h 2) (* a (pow g 2)))) (/ 1 a)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* g (- (+ (* 1/16 (/ (pow h 4) (* a (pow g 4)))) (* 1/4 (/ (pow h 2) (* a (pow g 2))))) (/ 1 a)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* g (- (+ (* 1/32 (/ (pow h 6) (* a (pow g 6)))) (+ (* 1/16 (/ (pow h 4) (* a (pow g 4)))) (* 1/4 (/ (pow h 2) (* a (pow g 2)))))) (/ 1 a)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -2 g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* g (- (* 1/2 (/ (pow h 2) (pow g 2))) 2))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* g (- (* 1/8 (/ (pow h 4) (pow g 4))) (+ 2 (* -1/2 (/ (pow h 2) (pow g 2))))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* g (- (* 1/16 (/ (pow h 6) (pow g 6))) (+ 2 (+ (* -1/2 (/ (pow h 2) (pow g 2))) (* -1/8 (/ (pow h 4) (pow g 4)))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* g (+ (* -1 (* (cbrt (/ (pow h 2) (* a (pow g 4)))) (* (cbrt -1) (pow (cbrt 1/2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (pow h 2) (cbrt 1/2)) (pow (cbrt 2) 2)))) (* 1/24 (* (cbrt (/ (* (pow g 2) (pow h 8)) a)) (/ 1 (cbrt 1/2))))) (pow g 3))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (pow (cbrt 1/2) 2)))) g)) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (pow h 2) (cbrt 1/2)) (pow (cbrt 2) 2)))) (+ (* -1/24 (* (cbrt (/ 1 (* a (pow g 2)))) (/ (* (pow h 4) (cbrt 1/2)) (pow (cbrt 2) 2)))) (+ (* 1/48 (* (cbrt (/ (pow h 14) (* a (pow g 4)))) (/ 1 (cbrt 1/2)))) (* 1/24 (* (cbrt (/ (* (pow g 2) (pow h 8)) a)) (/ 1 (cbrt 1/2))))))) (pow g 3))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (pow (cbrt 1/2) 2)))) g)) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (* (pow h 2) (cbrt 1/2)) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (* (pow h 2) (cbrt 1/2)) (pow (cbrt 2) 2)))) (+ (* -1/24 (* (cbrt (/ 1 (* a (pow g 14)))) (/ (* (pow h 4) (cbrt 1/2)) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (* (pow h 2) (cbrt 1/2)) (pow (cbrt 2) 2)))) (+ (* -1/24 (* (cbrt (/ 1 (* a (pow g 14)))) (/ (* (pow h 4) (cbrt 1/2)) (pow (cbrt 2) 2)))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow g 20))) (/ (* (cbrt 1/2) (- (* -1/16 (/ (pow h 6) a)) (* 1/12 (/ (* (pow g 2) (pow h 4)) (* a (pow (cbrt 2) 3)))))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (/ g a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (* g (+ (* -1/4 (/ (pow h 2) (* a (pow g 2)))) (/ 1 a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (* g (+ (* -1/4 (/ (pow h 2) (* a (pow g 2)))) (+ (* -1/16 (/ (pow h 4) (* a (pow g 4)))) (/ 1 a)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (* g (+ (* -1/4 (/ (pow h 2) (* a (pow g 2)))) (+ (* -1/16 (/ (pow h 4) (* a (pow g 4)))) (+ (* -1/32 (/ (pow h 6) (* a (pow g 6)))) (/ 1 a))))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -2 g)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (* g (+ 2 (* -1/2 (/ (pow h 2) (pow g 2))))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (* g (+ 2 (+ (* -1/2 (/ (pow h 2) (pow g 2))) (* -1/8 (/ (pow h 4) (pow g 4)))))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (* g (+ 2 (+ (* -1/2 (/ (pow h 2) (pow g 2))) (+ (* -1/8 (/ (pow h 4) (pow g 4))) (* -1/16 (/ (pow h 6) (pow g 6))))))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* -1 g)))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* -1 (* g (+ 1 (* -1/2 (/ (pow h 2) (pow g 2))))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1/2 (/ (pow h 2) (pow g 2))) (* -1/8 (/ (pow h 4) (pow g 4)))))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1/2 (/ (pow h 2) (pow g 2))) (+ (* -1/8 (/ (pow h 4) (pow g 4))) (* -1/16 (/ (pow h 6) (pow g 6))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (pow (cbrt 1/2) 2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* -1/24 (* (cbrt (/ (pow h 8) (* a (pow g 7)))) (/ 1 (cbrt 1/2)))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (pow (cbrt 1/2) 2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/48 (* (cbrt (/ (pow h 14) (* a (pow g 4)))) (/ 1 (cbrt 1/2)))) (* 1/24 (* (cbrt (/ (* (pow g 2) (pow h 8)) a)) (/ 1 (cbrt 1/2))))) (pow g 3))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (pow (cbrt 1/2) 2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* -1 (/ (+ (* 1/576 (* (cbrt (/ (pow h 14) (* a (pow g 4)))) (/ (cbrt -1) (pow (cbrt 1/2) 4)))) (+ (* 1/48 (* (cbrt (/ (pow h 14) (* a (pow g 4)))) (/ 1 (cbrt 1/2)))) (* 1/24 (* (cbrt (/ (* (pow g 2) (pow h 8)) a)) (/ 1 (cbrt 1/2)))))) (pow g 3))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (pow (cbrt 1/2) 2))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1/4 (/ (pow h 2) (* a g)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (/ (+ (* 1/16 (/ (pow h 4) (* a (pow g 2)))) (* 1/4 (/ (pow h 2) a))) g))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (/ (+ (* 1/32 (/ (pow h 6) (* a (pow g 4)))) (+ (* 1/16 (/ (pow h 4) (* a (pow g 2)))) (* 1/4 (/ (pow h 2) a)))) g))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (/ (+ (* 1/32 (/ (pow h 6) (* a (pow g 4)))) (+ (* 1/16 (/ (pow h 4) (* a (pow g 2)))) (+ (* 1/4 (/ (+ (* 1/64 (pow h 8)) (* 1/16 (pow h 8))) (* a (pow g 6)))) (* 1/4 (/ (pow h 2) a))))) g))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1/2 (/ (pow h 2) g))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (/ (- (* 1/8 (/ (pow h 4) (pow g 2))) (* -1/2 (pow h 2))) g))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (/ (- (* 1/16 (/ (pow h 6) (pow g 4))) (+ (* -1/2 (pow h 2)) (* -1/8 (/ (pow h 4) (pow g 2))))) g))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (/ (- (* 1/2 (/ (+ (* 1/64 (pow h 8)) (* 1/16 (pow h 8))) (pow g 6))) (+ (* -1/2 (pow h 2)) (+ (* -1/8 (/ (pow h 4) (pow g 2))) (* -1/16 (/ (pow h 6) (pow g 4)))))) g))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1/2) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (pow h 2) (cbrt -1/2)) (pow (cbrt 2) 2)))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1/2) (cbrt 1/2)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (+ (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1/2) (cbrt 1/2))) (* (pow h 2) (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (cbrt -1/2) (pow (cbrt 2) 2)))) (* (pow h 2) (+ (* -1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt -1/2) (+ (* 1/12 (/ 1 (* a (* (pow g 3) (pow (cbrt 2) 3))))) (* 1/8 (/ 1 (* a (pow g 3)))))) (pow (cbrt 2) 2)))) (* -1/24 (* (cbrt (/ 1 (* a (* (pow g 7) (pow h 4))))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2))))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (+ (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1/2) (cbrt 1/2))) (* (pow h 2) (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (cbrt -1/2) (pow (cbrt 2) 2)))) (* (pow h 2) (+ (* -1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt -1/2) (+ (* 1/12 (/ 1 (* a (* (pow g 3) (pow (cbrt 2) 3))))) (* 1/8 (/ 1 (* a (pow g 3)))))) (pow (cbrt 2) 2)))) (+ (* -1/24 (* (cbrt (/ 1 (* a (* (pow g 7) (pow h 4))))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))) (* (pow h 2) (+ (* -1/48 (* (cbrt (/ 1 (* a (* (pow g 13) (pow h 4))))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt -1/2) (- (* 1/216 (/ 1 (* a (* (pow g 5) (pow (cbrt 2) 6))))) (+ (* 1/16 (/ 1 (* a (pow g 5)))) (* 1/3 (/ (+ (* 1/12 (/ 1 (* a (* (pow g 3) (pow (cbrt 2) 3))))) (* 1/8 (/ 1 (* a (pow g 3))))) (* (pow g 2) (pow (cbrt 2) 3))))))) (pow (cbrt 2) 2)))))))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1/2) (cbrt 1/2))) (* (pow h 4) (+ (* -1/24 (* (cbrt (/ 1 (* a (* (pow g 7) (pow h 4))))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))) (* -1/48 (* (cbrt (/ (pow h 2) (* a (pow g 13)))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1/2) (cbrt 1/2))) (* (pow h 4) (+ (* -1/24 (* (cbrt (/ 1 (* a (* (pow g 7) (pow h 4))))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))) (* (pow h 2) (+ (* -1/3 (* (cbrt (* (pow a 2) (* (pow g 2) (pow h 2)))) (/ (* (cbrt 1/2) (+ (* 1/192 (/ 1 (* a (* (pow g 5) (* (pow h 2) (pow (cbrt -1/2) 3)))))) (* 5/128 (/ 1 (* a (pow g 7)))))) (pow (cbrt -1/2) 2)))) (* -1/48 (* (cbrt (/ 1 (* a (* (pow g 13) (pow h 4))))) (/ (cbrt 1/2) (pow (cbrt -1/2) 2)))))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* (pow h 2) (- (* -1/16 (/ (pow h 2) (* a (pow g 3)))) (* 1/4 (/ 1 (* a g)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* (pow h 2) (- (* (pow h 2) (- (* -1/32 (/ (pow h 2) (* a (pow g 5)))) (* 1/16 (/ 1 (* a (pow g 3)))))) (* 1/4 (/ 1 (* a g)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* (pow h 2) (- (* (pow h 2) (- (* (pow h 2) (- (* -5/256 (/ (pow h 2) (* a (pow g 7)))) (* 1/32 (/ 1 (* a (pow g 5)))))) (* 1/16 (/ 1 (* a (pow g 3)))))) (* 1/4 (/ 1 (* a g)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* (pow h 2) (- (* -1/8 (/ (pow h 2) (pow g 3))) (* 1/2 (/ 1 g))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* (pow h 2) (- (* (pow h 2) (- (* -1/16 (/ (pow h 2) (pow g 5))) (* 1/8 (/ 1 (pow g 3))))) (* 1/2 (/ 1 g))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* (pow h 2) (- (* (pow h 2) (- (* (pow h 2) (- (* -5/128 (/ (pow h 2) (pow g 7))) (* 1/16 (/ 1 (pow g 5))))) (* 1/8 (/ 1 (pow g 3))))) (* 1/2 (/ 1 g))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (+ g (* -1/2 (/ (pow h 2) g)))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (+ g (* (pow h 2) (- (* -1/8 (/ (pow h 2) (pow g 3))) (* 1/2 (/ 1 g)))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (+ g (* (pow h 2) (- (* (pow h 2) (- (* -1/16 (/ (pow h 2) (pow g 5))) (* 1/8 (/ 1 (pow g 3))))) (* 1/2 (/ 1 g)))))))
#s(approx (- (* g g) (* h h)) #s(hole binary64 (+ (* -1 (pow h 2)) (pow g 2))))
#s(approx (* h h) #s(hole binary64 (pow h 2)))
#s(approx h #s(hole binary64 h))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (pow h 2) (cbrt -1/2)) (pow (cbrt 2) 2)))) (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (pow h 2) (+ (* -1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (pow h 2) (* (cbrt -1/2) (+ (* 1/12 (/ 1 (* a (* (pow g 3) (pow (cbrt 2) 3))))) (* 1/8 (/ 1 (* a (pow g 3))))))) (pow (cbrt 2) 2)))) (* -1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (cbrt -1/2) (pow (cbrt 2) 2)))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (pow h 2) (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (cbrt -1/2) (pow (cbrt 2) 2)))) (* (pow h 2) (+ (* -1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt -1/2) (+ (* 1/12 (/ 1 (* a (* (pow g 3) (pow (cbrt 2) 3))))) (* 1/8 (/ 1 (* a (pow g 3)))))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (pow h 2) (* (cbrt -1/2) (- (* 1/216 (/ 1 (* a (* (pow g 5) (pow (cbrt 2) 6))))) (+ (* 1/16 (/ 1 (* a (pow g 5)))) (* 1/3 (/ (+ (* 1/12 (/ 1 (* a (* (pow g 3) (pow (cbrt 2) 3))))) (* 1/8 (/ 1 (* a (pow g 3))))) (* (pow g 2) (pow (cbrt 2) 3)))))))) (pow (cbrt 2) 2)))))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (+ (* -1 (/ g a)) (* 1/4 (/ (pow h 2) (* a g))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (+ (* -1 (/ g a)) (* (pow h 2) (+ (* 1/16 (/ (pow h 2) (* a (pow g 3)))) (* 1/4 (/ 1 (* a g))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (+ (* -1 (/ g a)) (* (pow h 2) (+ (* (pow h 2) (+ (* 1/32 (/ (pow h 2) (* a (pow g 5)))) (* 1/16 (/ 1 (* a (pow g 3)))))) (* 1/4 (/ 1 (* a g))))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (- (* 1/2 (/ (pow h 2) g)) (* 2 g))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (- (* (pow h 2) (+ (* 1/8 (/ (pow h 2) (pow g 3))) (* 1/2 (/ 1 g)))) (* 2 g))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (- (* (pow h 2) (+ (* (pow h 2) (+ (* 1/16 (/ (pow h 2) (pow g 5))) (* 1/8 (/ 1 (pow g 3))))) (* 1/2 (/ 1 g)))) (* 2 g))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* h (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* h (+ (* -1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt 1/2)))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt -1/2)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* h (+ (* -1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt 1/2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (pow g 2) (cbrt -1/2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (pow g 2) (cbrt 1/2)))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt -1/2)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* h (+ (* -1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt 1/2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (pow g 2) (cbrt -1/2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (pow g 2) (cbrt 1/2)))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt -1/2)))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 14) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* -1/8 (/ (pow g 4) (* a (pow (sqrt -1) 3)))) (* 1/3 (/ (* (pow g 2) (pow h 2)) (* a (sqrt -1)))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 14) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* -1/8 (/ (pow g 4) (* a (pow (sqrt -1) 3)))) (* 1/3 (/ (* (pow g 2) (pow h 2)) (* a (sqrt -1)))))))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* h (+ (* -1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt 1/2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* h (+ (* -1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt 1/2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (pow g 2) (cbrt 1/2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* h (+ (* -1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt 1/2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (pow g 2) (cbrt 1/2)))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 14) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* -1/8 (/ (pow g 4) (* a (pow (sqrt -1) 3)))) (* 1/3 (/ (* (pow g 2) (pow h 2)) (* a (sqrt -1)))))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* h (+ (* -1/2 (/ g (* a h))) (* 1/2 (/ (sqrt -1) a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* h (+ (* -1/2 (/ g (* a h))) (+ (* 1/4 (/ (pow g 2) (* a (* (pow h 2) (sqrt -1))))) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* h (+ (* -1/2 (/ g (* a h))) (+ (* -1/16 (/ (pow g 4) (* a (* (pow h 4) (pow (sqrt -1) 3))))) (+ (* 1/4 (/ (pow g 2) (* a (* (pow h 2) (sqrt -1))))) (* 1/2 (/ (sqrt -1) a))))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* h (+ (sqrt -1) (* -1 (/ g h))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* h (- (+ (sqrt -1) (* 1/2 (/ (pow g 2) (* (pow h 2) (sqrt -1))))) (/ g h)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* -1/8 (/ (pow g 4) (* (pow h 4) (pow (sqrt -1) 3)))) (* 1/2 (/ (pow g 2) (* (pow h 2) (sqrt -1)))))) (/ g h)))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* h (+ (sqrt -1) (* 1/2 (/ (pow g 2) (* (pow h 2) (sqrt -1))))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/8 (/ (pow g 4) (* (pow h 4) (pow (sqrt -1) 3)))) (* 1/2 (/ (pow g 2) (* (pow h 2) (sqrt -1)))))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/8 (/ (pow g 4) (* (pow h 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow g 6) (* (pow h 6) (pow (sqrt -1) 5)))) (* 1/2 (/ (pow g 2) (* (pow h 2) (sqrt -1))))))))))
#s(approx (- (* g g) (* h h)) #s(hole binary64 (* (pow h 2) (- (/ (pow g 2) (pow h 2)) 1))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt -1/2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (pow g 2) (cbrt -1/2)))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt -1/2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (pow g 2) (cbrt -1/2)))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt -1/2)))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 14) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* -1/8 (/ (pow g 4) (* a (pow (sqrt -1) 3)))) (* 1/3 (/ (* (pow g 2) (pow h 2)) (* a (sqrt -1)))))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* h (+ (* -1/2 (/ g (* a h))) (* -1/2 (/ (sqrt -1) a))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* h (+ (* -1/2 (/ g (* a h))) (+ (* -1/2 (/ (sqrt -1) a)) (* -1/4 (/ (pow g 2) (* a (* (pow h 2) (sqrt -1))))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* h (+ (* -1/2 (/ g (* a h))) (+ (* -1/2 (/ (sqrt -1) a)) (+ (* -1/4 (/ (pow g 2) (* a (* (pow h 2) (sqrt -1))))) (* 1/16 (/ (pow g 4) (* a (* (pow h 4) (pow (sqrt -1) 3)))))))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* h (- (* -1 (/ g h)) (sqrt -1)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* h (- (* -1/2 (/ (pow g 2) (* (pow h 2) (sqrt -1)))) (+ (sqrt -1) (/ g h))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* h (- (* 1/8 (/ (pow g 4) (* (pow h 4) (pow (sqrt -1) 3)))) (+ (sqrt -1) (+ (* 1/2 (/ (pow g 2) (* (pow h 2) (sqrt -1)))) (/ g h)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* g (cbrt 1/2)))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* g (cbrt -1/2))))) (pow h 3))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt -1/2)))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt 1/2))))) h)) (+ (* -1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* g (cbrt 1/2)))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* g (cbrt -1/2)))))) (pow h 3))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt -1/2)))) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt 1/2)))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* -1/8 (/ (pow g 4) (* a (pow (sqrt -1) 3)))) (* 1/3 (/ (* (pow g 2) (pow h 2)) (* a (sqrt -1)))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* -1/8 (/ (pow g 4) (* a (pow (sqrt -1) 3)))) (* 1/3 (/ (* (pow g 2) (pow h 2)) (* a (sqrt -1))))))))))) h)) (+ (* -1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* g (cbrt 1/2)))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* g (cbrt -1/2)))))) (pow h 3))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* -1 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* -1 (* h (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt 1/2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* g (cbrt 1/2)))) (* -1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt 1/2))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt 1/2)))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* -1/8 (/ (pow g 4) (* a (pow (sqrt -1) 3)))) (* 1/3 (/ (* (pow g 2) (pow h 2)) (* a (sqrt -1))))))))) h)) (* -1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* g (cbrt 1/2))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1/2 (/ (* h (sqrt -1)) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (* h (+ (* 1/2 (/ g (* a h))) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (/ g a)) (* -1/4 (/ (pow g 2) (* a (* h (sqrt -1)))))) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (/ (pow g 4) (* a (* (pow h 2) (pow (sqrt -1) 3))))) (* 1/4 (/ (pow g 2) (* a (sqrt -1))))) h)) (* -1/2 (/ g a))) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (/ g h))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (* -1/2 (/ (pow g 2) (* h (sqrt -1)))) g) h)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow g 4) (* (pow h 2) (pow (sqrt -1) 3)))) (* 1/2 (/ (pow g 2) (sqrt -1)))) h)) g) h)))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* 1/2 (/ (pow g 2) (* (pow h 2) (sqrt -1)))))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (+ (* -1/8 (/ (pow g 4) (* (pow h 4) (pow (sqrt -1) 3)))) (* 1/2 (/ (pow g 2) (* (pow h 2) (sqrt -1))))))))))
#s(approx (sqrt (- (* g g) (* h h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (+ (* -1/8 (/ (pow g 4) (* (pow h 4) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow g 6) (* (pow h 6) (pow (sqrt -1) 5)))) (* 1/2 (/ (pow g 2) (* (pow h 2) (sqrt -1)))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* -1 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* g (cbrt -1/2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt -1/2)))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* g (cbrt -1/2))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt -1/2)))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* -1/8 (/ (pow g 4) (* a (pow (sqrt -1) 3)))) (* 1/3 (/ (* (pow g 2) (pow h 2)) (* a (sqrt -1))))))))) h)) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* g (cbrt -1/2))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* 1/2 (/ (* h (sqrt -1)) a))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (* h (+ (* -1/2 (/ (sqrt -1) a)) (* 1/2 (/ g (* a h))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (/ g a)) (* 1/4 (/ (pow g 2) (* a (* h (sqrt -1)))))) h)) (* -1/2 (/ (sqrt -1) a)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow g 2) (* a (sqrt -1)))) (* 1/16 (/ (pow g 4) (* a (* (pow h 2) (pow (sqrt -1) 3)))))) h)) (* -1/2 (/ g a))) h)) (* -1/2 (/ (sqrt -1) a)))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (* h (- (/ g h) (sqrt -1))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (* h (- (* -1 (/ (- (* 1/2 (/ (pow g 2) (* h (sqrt -1)))) g) h)) (sqrt -1))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) #s(hole binary64 (* -1 (* h (- (* -1 (/ (- (* -1 (/ (- (* 1/8 (/ (pow g 4) (* (pow h 2) (pow (sqrt -1) 3)))) (* 1/2 (/ (pow g 2) (sqrt -1)))) h)) g) h)) (sqrt -1))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (- (pow g 2) (pow h 2)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (- (pow g 2) (pow h 2))) g))) (cbrt 1/2))) a)))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* (cbrt (/ (- (sqrt (- (pow g 2) (pow h 2))) g) a)) (cbrt 1/2))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* 1/2 (/ (- (sqrt (- (pow g 2) (pow h 2))) g) a))))
#s(approx (/ 1 (* 2 a)) #s(hole binary64 (/ 1/2 a)))
#s(approx (* 2 a) #s(hole binary64 (* 2 a)))
#s(approx a #s(hole binary64 a))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* (cbrt (/ (+ g (sqrt (- (pow g 2) (pow h 2)))) a)) (cbrt -1/2))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) #s(hole binary64 (* -1/2 (/ (+ g (sqrt (- (pow g 2) (pow h 2)))) a))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (- (pow g 2) (pow h 2)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (- (pow g 2) (pow h 2))) g) a)) (cbrt 1/2)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (- (pow g 2) (pow h 2)))) a)) (* (cbrt -1) (cbrt 1/2))) (* (cbrt (/ (- (sqrt (- (pow g 2) (pow h 2))) g) a)) (* (cbrt -1) (cbrt -1/2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* (cbrt (/ (- (sqrt (- (pow g 2) (pow h 2))) g) a)) (* (cbrt -1) (cbrt -1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) #s(hole binary64 (* (cbrt (/ (+ g (sqrt (- (pow g 2) (pow h 2)))) a)) (* (cbrt -1) (cbrt 1/2)))))

Calls

9 calls:

Time	Variable		Point	Expression
12.0ms	h	@	0	((+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/ 1 (* 2 a)) 1 (* 2 a) 2 a (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg g) g (sqrt (- (* g g) (* h h))) (- (* g g) (* h h)) (* g g) (* h h) h (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (- (neg g) (sqrt (- (* g g) (* h h)))))
11.0ms	g	@	inf	((+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/ 1 (* 2 a)) 1 (* 2 a) 2 a (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg g) g (sqrt (- (* g g) (* h h))) (- (* g g) (* h h)) (* g g) (* h h) h (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (- (neg g) (sqrt (- (* g g) (* h h)))))
10.0ms	h	@	inf	((+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/ 1 (* 2 a)) 1 (* 2 a) 2 a (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg g) g (sqrt (- (* g g) (* h h))) (- (* g g) (* h h)) (* g g) (* h h) h (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (- (neg g) (sqrt (- (* g g) (* h h)))))
9.0ms	a	@	0	((+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/ 1 (* 2 a)) 1 (* 2 a) 2 a (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg g) g (sqrt (- (* g g) (* h h))) (- (* g g) (* h h)) (* g g) (* h h) h (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (- (neg g) (sqrt (- (* g g) (* h h)))))
9.0ms	g	@	0	((+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/ 1 (* 2 a)) 1 (* 2 a) 2 a (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg g) g (sqrt (- (* g g) (* h h))) (- (* g g) (* h h)) (* g g) (* h h) h (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (- (neg g) (sqrt (- (* g g) (* h h)))))

rewrite16.0ms (0.5%)

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

end0.0ms (0%)

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

start0.0ms (0%)

analyze159.0ms (5%)

sample2.5s (77.9%)

explain404.0ms (12.7%)

preprocess34.0ms (1.1%)

series91.0ms (2.9%)

rewrite16.0ms (0.5%)

end0.0ms (0%)

Profiling