2-ancestry mixing, positive discriminant

Time bar (total: 8.8s)

start0.0ms (0%)

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

analyze259.0ms (2.9%)

Memory
16.9MiB live, 256.2MiB allocated; 72ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
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)

sample4.1s (46.4%)

Memory
-75.8MiB live, 5 414.9MiB allocated; 1.6s collecting garbage
Samples
3.1s8 147×1valid
300.0ms1 527×0invalid
13.0ms109×0valid
Precisions
Click to see histograms. Total time spent on operations: 3.0s
ival-mult: 709.0ms (23.8% of total)
ival-cbrt: 668.0ms (22.4% of total)
adjust: 638.0ms (21.4% of total)
ival-div: 242.0ms (8.1% of total)
ival-sub: 240.0ms (8% of total)
ival-add: 204.0ms (6.8% of total)
ival-sqrt: 163.0ms (5.5% of total)
ival-neg: 102.0ms (3.4% of total)
exact: 12.0ms (0.4% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

explain447.0ms (5.1%)

Memory
6.0MiB live, 523.5MiB allocated; 66ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1350-1(-8.444895627618557e-158 -6.750871567136084e-247 -4.608505408648805e-33)(sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))
910-2(1.0320583466671346e-7 7.186496867752851e-111 -3.0429810395232236e+102)(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))))))
890-3(8.733031086150605e-140 7.2950710547027255e-301 1.7221746377753705e+182)(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))))))
751(7.318647062192125e+279 1.0196116942491958e-21 -3.174745077567938e+277)0-(+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))
610-0-(-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))
220-0-(-.f64 (*.f64 g g) (*.f64 h h))
210-1(-9.361418524129038e-139 7.11905609026759e-228 -3.661828980751199e-286)(*.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)))))
200-1(1.4299429121741167e+307 3.4738039545138396e-5 -4.1787780874535285e-279)(*.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)))))
00-0-(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))
00-0-a
00-0-#s(literal 1 binary64)
00-0-(*.f64 #s(literal 2 binary64) a)
00-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)))))))
00-0-(*.f64 h h)
00-0-(*.f64 g g)
00-0-(neg.f64 g)
00-0-#s(literal 2 binary64)
00-0-g
00-0-h
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
sqrt.f64(sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))oflow-rescue1160
(-.f64 (*.f64 g g) (*.f64 h h))overflow116
(*.f64 g g)overflow116
(*.f64 h h)overflow22
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-rescue300
(-.f64 (*.f64 g g) (*.f64 h h))overflow116
(*.f64 h h)overflow22
(*.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)))))overflow30
(*.f64 g g)overflow116
(-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))overflow1
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-rescue270
(*.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)))))overflow27
(-.f64 (*.f64 g g) (*.f64 h h))overflow116
(*.f64 g g)overflow116
(*.f64 h h)overflow22
-.f64(-.f64 (*.f64 g g) (*.f64 h h))nan-rescue220
(*.f64 g g)overflow116
(*.f64 h h)overflow22
+.f64(+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))cancellation160
-.f64(-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))cancellation121
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-rescue110
(-.f64 (*.f64 g g) (*.f64 h h))underflow18
(*.f64 h h)underflow101
(*.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)))))underflow56
(*.f64 g g)underflow18
(-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))underflow55
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-rescue70
(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))))))underflow4
(*.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)))))underflow66
(-.f64 (*.f64 g g) (*.f64 h h))underflow18
(*.f64 g g)underflow18
(*.f64 h h)underflow101
(+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))underflow63
sqrt.f64(sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))uflow-rescue70
(-.f64 (*.f64 g g) (*.f64 h h))underflow18
(*.f64 g g)underflow18
(*.f64 h h)underflow101
*.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)))))n*u20
Confusion
Predicted +Predicted -
+1508
-791
Precision
0.9554140127388535
Recall
0.9493670886075949
Confusion?
Predicted +Predicted MaybePredicted -
+15008
-7091
Precision?
0.9554140127388535
Recall?
0.9493670886075949
Freqs
test
numberfreq
099
190
249
312
44
52
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
91.0ms204×2valid
77.0ms114×3valid
62.0ms190×1valid
1.0ms0valid
Compiler

Compiled 371 to 61 computations (83.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 172.0ms
adjust: 58.0ms (33.7% of total)
ival-mult: 41.0ms (23.8% of total)
ival-cbrt: 17.0ms (9.9% of total)
ival-sub: 16.0ms (9.3% of total)
ival-add: 15.0ms (8.7% of total)
ival-sqrt: 13.0ms (7.5% of total)
ival-div: 9.0ms (5.2% of total)
ival-neg: 2.0ms (1.2% of total)
ival-true: 1.0ms (0.6% of total)
exact: 1.0ms (0.6% of total)
ival-assert: 0.0ms (0% of total)

preprocess99.0ms (1.1%)

Memory
2.9MiB live, 101.1MiB allocated; 10ms collecting garbage
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
084325
1263325
2837319
32952319
01937
03333
16733
219833
369132
4222231
0801631
Stop Event
iter limit
node limit
iter limit
node limit
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)))))))
Outputs
(+.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)))))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 h g) (-.f64 g h)))))) (cbrt.f64 (*.f64 (-.f64 g (sqrt.f64 (*.f64 (+.f64 h g) (-.f64 g h)))) (/.f64 #s(literal -1/2 binary64) a))))
Symmetry

(abs h)

Compiler

Compiled 37 to 19 computations (48.6% saved)

eval0.0ms (0%)

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

Compiled 0 to 3 computations (-∞% saved)

prune1.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
40.6%
(+.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)))))))
Compiler

Compiled 37 to 19 computations (48.6% saved)

series91.0ms (1%)

Memory
16.8MiB live, 108.7MiB allocated; 5ms 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:

TimeVariablePointExpression
13.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)))))
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
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)))))
9.0ms
a
@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)))))

rewrite277.0ms (3.1%)

Memory
-21.0MiB live, 213.5MiB allocated; 28ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0134238654716016
0136910574
1771510546
0918410518
Stop Event
iter limit
node limit
iter limit
Counts
219 → 268
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))))
#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)))))
Outputs
(/.f64 (-.f64 (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))))) (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))) (-.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))))))
(/.f64 (+.f64 (pow.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))))) (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))))))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))
(*.f64 (cbrt.f64 (/.f64 #s(literal 1/2 binary64) a)) (cbrt.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))))
(pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))
(*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)) (/.f64 #s(literal 1/2 binary64) a))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))) (*.f64 a #s(literal 2 binary64)))
(+.f64 (*.f64 (neg.f64 g) (/.f64 #s(literal 1/2 binary64) a)) (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (/.f64 #s(literal 1/2 binary64) a)))
(+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (neg.f64 g)) (*.f64 (/.f64 #s(literal 1/2 binary64) a) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))
(*.f64 (pow.f64 a #s(literal -1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))
(pow.f64 (*.f64 a #s(literal 2 binary64)) #s(literal -1 binary64))
(/.f64 #s(literal 1/2 binary64) a)
(/.f64 #s(literal -1/2 binary64) (neg.f64 a))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 a #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (*.f64 a #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 a #s(literal 2 binary64))) #s(literal -1 binary64)))
#s(literal 1 binary64)
(*.f64 a #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) a)
(+.f64 a a)
#s(literal 2 binary64)
a
(/.f64 (-.f64 (*.f64 g g) (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 g) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 3 binary64))) (+.f64 (*.f64 g g) (-.f64 (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) (*.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))
(+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))
(+.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))
(*.f64 #s(literal -1 binary64) g)
(*.f64 g #s(literal -1 binary64))
(neg.f64 g)
g
(pow.f64 (*.f64 (+.f64 g h) (-.f64 g h)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))
(exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 g h) (-.f64 g h))
(/.f64 (-.f64 (pow.f64 g #s(literal 4 binary64)) (pow.f64 h #s(literal 4 binary64))) (+.f64 (*.f64 g g) (*.f64 h h)))
(/.f64 (-.f64 (pow.f64 (*.f64 g g) #s(literal 3 binary64)) (pow.f64 (*.f64 h h) #s(literal 3 binary64))) (+.f64 (pow.f64 g #s(literal 4 binary64)) (+.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (*.f64 g h) #s(literal 2 binary64)))))
(-.f64 (*.f64 g g) (*.f64 h h))
(+.f64 (*.f64 g g) (*.f64 (neg.f64 h) h))
(*.f64 (pow.f64 g #s(literal 1 binary64)) (pow.f64 g #s(literal 1 binary64)))
(*.f64 (fabs.f64 g) (fabs.f64 g))
(*.f64 (neg.f64 g) (neg.f64 g))
(*.f64 g g)
(pow.f64 g #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 g) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 g) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 g) #s(literal 2 binary64))))
(*.f64 (pow.f64 h #s(literal 1 binary64)) (pow.f64 h #s(literal 1 binary64)))
(*.f64 (neg.f64 h) (neg.f64 h))
(*.f64 (fabs.f64 h) (fabs.f64 h))
(*.f64 h h)
(pow.f64 h #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 h) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 h) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 h) #s(literal 2 binary64))))
h
(*.f64 (cbrt.f64 (/.f64 #s(literal 1/2 binary64) a)) (cbrt.f64 (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))))
(pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))) #s(literal 1/3 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) a) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))
(*.f64 (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) (/.f64 #s(literal 1/2 binary64) a))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) (*.f64 a #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 g g) (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))
(/.f64 (-.f64 (pow.f64 (neg.f64 g) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 3 binary64))) (+.f64 (*.f64 g g) (+.f64 (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) (*.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))
(-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 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))))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (+.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64))) #s(literal -1/3 binary64)) (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64))))) g) (*.f64 (cbrt.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (+.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 (+.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64))) #s(literal -1/3 binary64)) (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/3 binary64) (+.f64 (*.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h)))) (cbrt.f64 #s(literal -1/2 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) h) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) #s(literal 1/3 binary64)))) (*.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h)))) (cbrt.f64 #s(literal 1/2 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) h) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) #s(literal 1/3 binary64)))))) g)) g) (*.f64 (cbrt.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (+.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 (+.f64 (-.f64 (*.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64))) #s(literal -1/3 binary64)) (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (+.f64 (*.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h)))) (cbrt.f64 #s(literal -1/2 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) h) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) #s(literal 1/3 binary64)))) (*.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h)))) (cbrt.f64 #s(literal 1/2 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) h) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) #s(literal 1/3 binary64)))))) (*.f64 (*.f64 #s(literal -1/3 binary64) (+.f64 (*.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h)))) (cbrt.f64 #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 2/3 binary64) (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) #s(literal 5 binary64)) (pow.f64 a #s(literal 4 binary64))))) #s(literal 1/9 binary64)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) h) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) #s(literal 1/3 binary64)))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))) #s(literal -1 binary64))) #s(literal 1/27 binary64)))) (*.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h)))) (cbrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -2/3 binary64) (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) #s(literal 5 binary64)) (pow.f64 a #s(literal 4 binary64))))) #s(literal 1/9 binary64)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) h) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) #s(literal 1/3 binary64)))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))) #s(literal -1 binary64))) #s(literal 1/27 binary64)))))) g)) g)) g) (*.f64 (cbrt.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (+.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (*.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g) (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))))) #s(literal 1/9 binary64)))) #s(literal -1/3 binary64)) (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h))))) (*.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) h) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) #s(literal 1/3 binary64))))) (*.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64))) #s(literal -1/3 binary64))) g) (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h))))) (*.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g) (-.f64 (*.f64 (*.f64 #s(literal -2/3 binary64) (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) #s(literal 5 binary64)) (pow.f64 a #s(literal 4 binary64))))) #s(literal 1/9 binary64)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) h) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) #s(literal 1/3 binary64)))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))) #s(literal -1 binary64))) #s(literal 1/27 binary64))))) (*.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h)))) (cbrt.f64 #s(literal 1/2 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) h) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) #s(literal 1/3 binary64)))))) g) (*.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64))) #s(literal -1/3 binary64))) g) (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (-.f64 (*.f64 (/.f64 g a) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 (-.f64 (*.f64 (/.f64 g (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) #s(literal 1/4 binary64)) (/.f64 #s(literal 1/2 binary64) a)) g) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 g g)) (*.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) #s(literal 3 binary64)) a))) g) (/.f64 #s(literal 1/2 binary64) a)) g) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) (neg.f64 g)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (+.f64 (*.f64 (-.f64 (*.f64 (/.f64 g (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) g) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 g g)) (pow.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) #s(literal 3 binary64)))) g) #s(literal 1 binary64)) g) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)))
#s(approx (neg g) (neg.f64 g))
#s(approx g g)
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g g)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 g g)) (pow.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) #s(literal 3 binary64)))) (*.f64 g g)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 g g)) (pow.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) #s(literal 5 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) #s(literal 3 binary64)))) (*.f64 g g)) (/.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h))) (*.f64 g g)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)))
#s(approx (- (* g g) (* h h)) (neg.f64 (*.f64 h h)))
#s(approx (- (* g g) (* h h)) (*.f64 (+.f64 g h) (-.f64 g h)))
#s(approx (* g g) (*.f64 g g))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g) (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))))) #s(literal 1/9 binary64)))) #s(literal 1/3 binary64)) (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (+.f64 (*.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h)))) g) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) h) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) #s(literal 1/3 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64))))) g) (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h))))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g) (+.f64 (*.f64 (*.f64 #s(literal 2/3 binary64) (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) #s(literal 5 binary64)) (pow.f64 a #s(literal 4 binary64))))) #s(literal 1/9 binary64)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) h) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) #s(literal 1/3 binary64)))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))) #s(literal -1 binary64))) #s(literal 1/27 binary64))))) (*.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h)))) (cbrt.f64 #s(literal -1/2 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) h) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) #s(literal 1/3 binary64)))))) g) (*.f64 (*.f64 (exp.f64 (*.f64 (neg.f64 (log.f64 (*.f64 (neg.f64 (*.f64 h h)) (pow.f64 a #s(literal 7 binary64))))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64))) #s(literal 1/3 binary64))) g) (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 g a) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 g (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a))) (/.f64 #s(literal 1/2 binary64) a)) g) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 g g)) (*.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) #s(literal 3 binary64)) a)) (/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a))) g) (/.f64 #s(literal 1/2 binary64) a)) g) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (neg.f64 g) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 (-.f64 (*.f64 (/.f64 g (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)) #s(literal -1/2 binary64)) #s(literal 1 binary64)) g) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 g g)) (pow.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) #s(literal 3 binary64))) (/.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h))) g) #s(literal 1 binary64)) g) (*.f64 (sqrt.f64 #s(literal -1 binary64)) 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))))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (/.f64 g 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))))))) (*.f64 (+.f64 (*.f64 (cbrt.f64 #s(literal -1/4 binary64)) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) (pow.f64 g #s(literal 4 binary64))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))))) 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))))))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 8 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))) (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) a) (pow.f64 g #s(literal 10 binary64))))) #s(literal -1/24 binary64))) (+.f64 (*.f64 (cbrt.f64 #s(literal -1/4 binary64)) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) (pow.f64 g #s(literal 4 binary64))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64)))))) 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))))))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 8 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/24 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 14 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (+.f64 (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) a) (pow.f64 g #s(literal 16 binary64)))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))) #s(literal -1/48 binary64)) (+.f64 (*.f64 (cbrt.f64 #s(literal -1/4 binary64)) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) (pow.f64 g #s(literal 4 binary64))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64)))))) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))) (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) a) (pow.f64 g #s(literal 10 binary64))))) #s(literal -1/24 binary64)))) g))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) a) (pow.f64 g #s(literal 7 binary64)))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))) #s(literal -1/24 binary64)) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (+.f64 (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) a) (pow.f64 g #s(literal 13 binary64)))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))) #s(literal -1/48 binary64)) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) a) (pow.f64 g #s(literal 7 binary64)))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))) #s(literal -1/24 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 5 binary64))) (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) a) (pow.f64 g #s(literal 13 binary64))))) #s(literal -1/576 binary64)) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) a) (pow.f64 g #s(literal 13 binary64)))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))) #s(literal -1/48 binary64))) (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) a) (pow.f64 g #s(literal 7 binary64)))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))) #s(literal -1/24 binary64))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 (*.f64 g g) a)) (*.f64 (/.f64 (*.f64 h h) a) #s(literal -1/4 binary64))) g))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 (*.f64 g g) a)) (*.f64 (/.f64 (*.f64 h h) a) #s(literal -1/4 binary64))) (/.f64 (*.f64 #s(literal -1/32 binary64) (pow.f64 h #s(literal 6 binary64))) (*.f64 (pow.f64 g #s(literal 4 binary64)) a))) g))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 h #s(literal 8 binary64)) #s(literal 5/64 binary64))) (*.f64 (pow.f64 g #s(literal 6 binary64)) a)) (*.f64 (/.f64 (*.f64 h h) a) #s(literal -1/4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 (*.f64 g g) a)) (/.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 h #s(literal 6 binary64))) (*.f64 (pow.f64 g #s(literal 4 binary64)) a)))) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (/.f64 (*.f64 h h) g) #s(literal -1/2 binary64)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 g g)) (*.f64 (*.f64 h h) #s(literal -1/2 binary64))) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 g g)) (*.f64 (*.f64 h h) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 h #s(literal 6 binary64))) (pow.f64 g #s(literal 4 binary64)))) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 h #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 g #s(literal 6 binary64))) (*.f64 (*.f64 h h) #s(literal -1/2 binary64))) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 g g)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 6 binary64))) (pow.f64 g #s(literal 4 binary64))))) g))
#s(approx (sqrt (- (* g g) (* h h))) g)
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 h h)) (*.f64 g g))) g))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 h h)) (*.f64 g g))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (pow.f64 g #s(literal 4 binary64)))) g))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 (+.f64 (+.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (pow.f64 g #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 6 binary64))) (pow.f64 g #s(literal 6 binary64)))) (/.f64 (*.f64 (*.f64 h h) #s(literal -1/2 binary64)) (*.f64 g g))) #s(literal 1 binary64)) g))
#s(approx (- (* g g) (* h h)) (*.f64 g g))
#s(approx (- (* g g) (* h h)) (*.f64 (+.f64 (/.f64 (neg.f64 (*.f64 h h)) (*.f64 g g)) #s(literal 1 binary64)) (*.f64 g g)))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (/.f64 g a))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 8 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))))) g))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/24 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 14 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))))) (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 8 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) g))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 8 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/24 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 14 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 20 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 h #s(literal 6 binary64)) a) #s(literal -1/16 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 g g) a) (/.f64 (pow.f64 h #s(literal 4 binary64)) #s(literal 2 binary64))) #s(literal 1/12 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64)))))) g))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h h)) (*.f64 (*.f64 g g) a)) (pow.f64 a #s(literal -1 binary64))) g))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 (pow.f64 g #s(literal 4 binary64)) a)) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h h)) (*.f64 (*.f64 g g) a)) (pow.f64 a #s(literal -1 binary64)))) g))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 h #s(literal 6 binary64))) (*.f64 (pow.f64 g #s(literal 6 binary64)) a)) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 (pow.f64 g #s(literal 4 binary64)) a)) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 h h)) (*.f64 (*.f64 g g) a)) (pow.f64 a #s(literal -1 binary64))))) g))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -2 binary64) g))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 h h)) (*.f64 g g)) #s(literal 2 binary64)) g))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (pow.f64 g #s(literal 4 binary64))) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 h h)) (*.f64 g g)))) g))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 6 binary64))) (pow.f64 g #s(literal 6 binary64))) (+.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 h h)) (*.f64 g g))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (pow.f64 g #s(literal 4 binary64))))) 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))))))) (neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 (neg.f64 g) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))) #s(literal 1 binary64)) (neg.f64 (*.f64 (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1 binary64))) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) (pow.f64 g #s(literal 4 binary64)))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 (neg.f64 g) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1 binary64))) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (cbrt.f64 (*.f64 (*.f64 g g) (/.f64 (pow.f64 h #s(literal 8 binary64)) a)))))) (pow.f64 g #s(literal 3 binary64))))) g)) (*.f64 (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))) #s(literal 1 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 (neg.f64 g) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/24 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) a) (pow.f64 g #s(literal 4 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (cbrt.f64 (*.f64 (*.f64 g g) (/.f64 (pow.f64 h #s(literal 8 binary64)) a))))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1 binary64))) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)))) g)) (*.f64 (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))) #s(literal 1 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (neg.f64 g) (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 8 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))) #s(literal 1 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (neg.f64 g) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/24 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 14 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 8 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (neg.f64 g) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 8 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/24 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 14 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 20 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 h #s(literal 6 binary64)) a) #s(literal -1/16 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 g g) a) (/.f64 (pow.f64 h #s(literal 4 binary64)) #s(literal 2 binary64))) #s(literal 1/12 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (neg.f64 g) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 (*.f64 g g) a)) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (neg.f64 g) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 (pow.f64 g #s(literal 4 binary64)) a)) (pow.f64 a #s(literal -1 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 (*.f64 g g) a)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (neg.f64 g) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (pow.f64 h #s(literal 6 binary64))) (*.f64 (pow.f64 g #s(literal 6 binary64)) a)) (pow.f64 a #s(literal -1 binary64))) (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 (pow.f64 g #s(literal 4 binary64)) a))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 (*.f64 g g) a)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -2 binary64) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (neg.f64 g) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 h h)) (*.f64 g g)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (neg.f64 g) (+.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 h h)) (*.f64 g g))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (pow.f64 g #s(literal 4 binary64))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (neg.f64 g) (+.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 h h)) (*.f64 g g))) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (pow.f64 g #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 6 binary64))) (pow.f64 g #s(literal 6 binary64)))))))
#s(approx (sqrt (- (* g g) (* h h))) (neg.f64 g))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 (neg.f64 g) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 h h)) (*.f64 g g)))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 (neg.f64 g) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 h h)) (*.f64 g g))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (pow.f64 g #s(literal 4 binary64))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 (neg.f64 g) (+.f64 (+.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (pow.f64 g #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 6 binary64))) (pow.f64 g #s(literal 6 binary64)))) (/.f64 (*.f64 (*.f64 h h) #s(literal -1/2 binary64)) (*.f64 g g))) #s(literal 1 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1 binary64))) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (*.f64 #s(literal -1/24 binary64) (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) a) (pow.f64 g #s(literal 7 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (*.f64 (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1 binary64))) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) a) (pow.f64 g #s(literal 4 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (cbrt.f64 (*.f64 (*.f64 g g) (/.f64 (pow.f64 h #s(literal 8 binary64)) a)))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1 binary64))) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64))) (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) a) (pow.f64 g #s(literal 4 binary64))))) #s(literal 1/576 binary64)) (*.f64 (*.f64 #s(literal 1/48 binary64) (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) a) (pow.f64 g #s(literal 4 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal 1/24 binary64) (cbrt.f64 (*.f64 (*.f64 g g) (/.f64 (pow.f64 h #s(literal 8 binary64)) a)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1 binary64))) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 (*.f64 g g) a)) (*.f64 (/.f64 (*.f64 h h) a) #s(literal -1/4 binary64))) g)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 h #s(literal 6 binary64))) (*.f64 (pow.f64 g #s(literal 4 binary64)) a)) (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 (*.f64 g g) a)) (*.f64 (/.f64 (*.f64 h h) a) #s(literal -1/4 binary64)))) g)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (neg.f64 (/.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (pow.f64 h #s(literal 8 binary64)) #s(literal 5/64 binary64)) a) (pow.f64 g #s(literal 6 binary64))) (/.f64 (*.f64 h h) a))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 (*.f64 g g) a))) (/.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 h #s(literal 6 binary64))) (*.f64 (pow.f64 g #s(literal 4 binary64)) a))) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (/.f64 (*.f64 h h) g) #s(literal -1/2 binary64)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 g g)) (*.f64 (*.f64 h h) #s(literal -1/2 binary64))) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 6 binary64))) (pow.f64 g #s(literal 4 binary64))) (*.f64 (*.f64 h h) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 g g))) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 h #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 g #s(literal 6 binary64))) (*.f64 (*.f64 h h) #s(literal -1/2 binary64))) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 h #s(literal 4 binary64))) (*.f64 g g)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 6 binary64))) (pow.f64 g #s(literal 4 binary64))))) 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))))))) (+.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (/.f64 g 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))))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 5 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (/.f64 g a)))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (+.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (/.f64 g a)))) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 g #s(literal 3 binary64)) a)) (/.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64)) a))) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g)))) #s(literal -1/3 binary64)) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))))) (*.f64 h h)) (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 5 binary64)) a) #s(literal -1 binary64)))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 h 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))))))) (+.f64 (+.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (/.f64 g a)))) (*.f64 (+.f64 (*.f64 (+.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 g #s(literal 3 binary64)) a)) (/.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64)) a))) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g)))) #s(literal -1/3 binary64)) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))))) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (/.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/216 binary64) (*.f64 (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 4 binary64)) a)) (/.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 g #s(literal 5 binary64)) a))) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 g #s(literal 3 binary64)) a)) (/.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64)) a))) (*.f64 (*.f64 g g) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 g #s(literal 13 binary64)) (pow.f64 h #s(literal 4 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))) #s(literal -1/48 binary64))) (*.f64 h h))) (*.f64 h h)) (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 5 binary64)) a) #s(literal -1 binary64)))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 h h))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))) #s(literal -1/24 binary64)) (*.f64 #s(literal 1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) (pow.f64 g #s(literal 13 binary64)))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))))) (pow.f64 h #s(literal 4 binary64))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (*.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a a)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (/.f64 (+.f64 (/.f64 #s(literal 5/128 binary64) (*.f64 (pow.f64 g #s(literal 7 binary64)) a)) (/.f64 #s(literal 1/192 binary64) (*.f64 (*.f64 (pow.f64 g #s(literal 5 binary64)) a) (*.f64 (*.f64 h h) #s(literal -1/2 binary64))))) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 g #s(literal 13 binary64)) (pow.f64 h #s(literal 4 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))))) (*.f64 h h)) (*.f64 (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))) #s(literal -1/24 binary64))) (pow.f64 h #s(literal 4 binary64))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 h h)) (*.f64 (pow.f64 g #s(literal 3 binary64)) a)) (/.f64 #s(literal 1/4 binary64) (*.f64 g a))) (*.f64 h h)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 h h)) (*.f64 (pow.f64 g #s(literal 5 binary64)) a)) (/.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 g #s(literal 3 binary64)) a))) (*.f64 h h)) (/.f64 #s(literal 1/4 binary64) (*.f64 g a))) (*.f64 h h)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -5/256 binary64) (*.f64 h h)) (*.f64 (pow.f64 g #s(literal 7 binary64)) a)) (/.f64 #s(literal 1/32 binary64) (*.f64 (pow.f64 g #s(literal 5 binary64)) a))) (*.f64 h h)) (/.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 g #s(literal 3 binary64)) a))) (*.f64 h h)) (/.f64 #s(literal 1/4 binary64) (*.f64 g a))) (*.f64 h h)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h h)) (pow.f64 g #s(literal 3 binary64))) (/.f64 #s(literal 1/2 binary64) g)) (*.f64 h h)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 h h)) (pow.f64 g #s(literal 5 binary64))) (*.f64 (pow.f64 g #s(literal -3 binary64)) #s(literal 1/8 binary64))) (*.f64 h h)) (/.f64 #s(literal 1/2 binary64) g)) (*.f64 h h)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -5/128 binary64) (*.f64 h h)) (pow.f64 g #s(literal 7 binary64))) (*.f64 (pow.f64 g #s(literal -5 binary64)) #s(literal 1/16 binary64))) (*.f64 h h)) (*.f64 (pow.f64 g #s(literal -3 binary64)) #s(literal 1/8 binary64))) (*.f64 h h)) (/.f64 #s(literal 1/2 binary64) g)) (*.f64 h h)))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 (/.f64 (*.f64 h h) g) #s(literal -1/2 binary64)) g))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 h h)) (pow.f64 g #s(literal 3 binary64))) (/.f64 #s(literal 1/2 binary64) g)) (*.f64 h h)) g))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 h h)) (pow.f64 g #s(literal 5 binary64))) (*.f64 (pow.f64 g #s(literal -3 binary64)) #s(literal 1/8 binary64))) (*.f64 h h)) (/.f64 #s(literal 1/2 binary64) g)) (*.f64 h h)) g))
#s(approx (- (* g g) (* h h)) (+.f64 (neg.f64 (*.f64 h h)) (*.f64 g g)))
#s(approx (* h h) (*.f64 h h))
#s(approx h h)
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 5 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (/.f64 g a)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 h h) (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 g #s(literal 3 binary64)) a)) (/.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64)) a))) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g)))) #s(literal -1/3 binary64)) (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 5 binary64)) a) #s(literal -1 binary64)))))) (*.f64 h h)) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (/.f64 g a)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g)))) (/.f64 (*.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (-.f64 (-.f64 (/.f64 #s(literal 1/216 binary64) (*.f64 (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 4 binary64)) a)) (/.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 g #s(literal 5 binary64)) a))) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 g #s(literal 3 binary64)) a)) (/.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64)) a))) (*.f64 (*.f64 g g) #s(literal 2 binary64))) #s(literal 1/3 binary64)))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 g #s(literal 3 binary64)) a)) (/.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64)) a))) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g)))) #s(literal -1/3 binary64))) (*.f64 h h)) (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 5 binary64)) a) #s(literal -1 binary64)))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 h h)) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (/.f64 g a)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (-.f64 (/.f64 (neg.f64 g) a) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 h h)) (*.f64 (pow.f64 g #s(literal 3 binary64)) a)) (/.f64 #s(literal 1/4 binary64) (*.f64 g a))) (*.f64 h h)) (/.f64 (neg.f64 g) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 h h)) (*.f64 (pow.f64 g #s(literal 5 binary64)) a)) (/.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 g #s(literal 3 binary64)) a))) (*.f64 h h)) (/.f64 #s(literal 1/4 binary64) (*.f64 g a))) (*.f64 h h)) (/.f64 (neg.f64 g) a)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 (/.f64 (*.f64 h h) g) #s(literal 1/2 binary64)) (*.f64 g #s(literal 2 binary64))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 h h)) (pow.f64 g #s(literal 3 binary64))) (/.f64 #s(literal 1/2 binary64) g)) (*.f64 h h)) (*.f64 g #s(literal 2 binary64))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 h h)) (pow.f64 g #s(literal 5 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal -3 binary64)))) (*.f64 h h)) (/.f64 #s(literal 1/2 binary64) g)) (*.f64 h h)) (*.f64 g #s(literal 2 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h))) (+.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))) 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))))))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g)) (*.f64 (cbrt.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h))) (+.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) 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))))))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g)) (*.f64 (*.f64 (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))) (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) #s(literal 1/6 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) #s(literal 1/6 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g)) (*.f64 (cbrt.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h))) (+.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64))))))) 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))))))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g)) (*.f64 (*.f64 (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))) (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) #s(literal 1/6 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64))))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) a)) (*.f64 (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) a)) #s(literal 1/3 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h))) (+.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64))))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) a)) (*.f64 (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) a)) #s(literal 1/3 binary64))) (cbrt.f64 #s(literal -1/2 binary64))))))) h))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g)) (cbrt.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h)) #s(literal 1/2 binary64)))) h))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g)) (*.f64 (*.f64 (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) #s(literal 1/6 binary64))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h)) #s(literal 1/2 binary64)))) h))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g)) (*.f64 (*.f64 (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) #s(literal 1/6 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64))))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) a)) (*.f64 (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) a)) #s(literal 1/3 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h)) #s(literal 1/2 binary64))))) h))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (-.f64 (*.f64 (/.f64 (/.f64 g a) h) #s(literal -1/2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) #s(literal -1/2 binary64))) h))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 g g)) (*.f64 (*.f64 (*.f64 h h) a) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) #s(literal -1/2 binary64))) (*.f64 (/.f64 (/.f64 g a) h) #s(literal -1/2 binary64))) h))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (+.f64 (+.f64 (*.f64 (/.f64 (/.f64 g a) h) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (*.f64 a (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 g g)) (*.f64 (*.f64 (*.f64 h h) a) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) #s(literal -1/2 binary64)))) h))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (+.f64 (/.f64 (neg.f64 g) h) (sqrt.f64 #s(literal -1 binary64))) h))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g g)) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))) (/.f64 g h)) h))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (-.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g g)) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g h)) h))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g g)) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))) h))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g g)) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) h))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 g #s(literal 6 binary64))) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 g g)) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) h))
#s(approx (- (* g g) (* h h)) (*.f64 (-.f64 (/.f64 (*.f64 g g) (*.f64 h h)) #s(literal 1 binary64)) (*.f64 h h)))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g)) (cbrt.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h)) #s(literal -1/2 binary64)))) h))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))) (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h)) #s(literal -1/2 binary64)))) h))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))) (cbrt.f64 (/.f64 (pow.f64 a #s(literal -1 binary64)) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g))) (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64))))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) a)) (*.f64 (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) a)) #s(literal 1/3 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h)) #s(literal -1/2 binary64))))) h))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (/.f64 g a) h) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) h))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (/.f64 g a) h) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 g g)) (*.f64 (*.f64 (*.f64 h h) a) (sqrt.f64 #s(literal -1 binary64))))) h))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (/.f64 g a) h) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 g g)) (*.f64 (*.f64 (*.f64 h h) a) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (*.f64 a (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) h))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (-.f64 (/.f64 (neg.f64 g) h) (sqrt.f64 #s(literal -1 binary64))) h))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 g g)) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))) (/.f64 g h)) h))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (-.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 #s(literal -1 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g g)) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 g h))) 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))))))) (neg.f64 (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h))) (+.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))) 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))))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g)) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g)))) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h))) (+.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64))))) 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))))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) h)) (-.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g)) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g))))) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h))) (+.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64))))) 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))))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/3 binary64) (+.f64 (*.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) a)) (*.f64 (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) a)) #s(literal 1/3 binary64))) (cbrt.f64 #s(literal -1/2 binary64))) (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h))))) (*.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) a)) (*.f64 (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) a)) #s(literal 1/3 binary64))) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h)))))))) h)) (-.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g)) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g))))) (pow.f64 h #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h))) (+.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64))))) h)))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (neg.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g)) (cbrt.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h)) #s(literal 1/2 binary64)))) h)))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) a))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h)) #s(literal 1/2 binary64)))) h)))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h))))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) a)) (*.f64 (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) a)) #s(literal 1/3 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))) #s(literal 1/6 binary64))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) g)))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h)) #s(literal 1/2 binary64)))) h)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 g a) h) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) h)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 g g)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)) (*.f64 (/.f64 g a) #s(literal -1/2 binary64))) h)) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) #s(literal -1/2 binary64))) h)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 h h) a) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 g g)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) a))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 g a))) h)) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) #s(literal -1/2 binary64))) h)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg.f64 (*.f64 (+.f64 (/.f64 g h) (sqrt.f64 #s(literal -1 binary64))) h)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 g g)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)) g) h)) (sqrt.f64 #s(literal -1 binary64))) h)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g g)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 h h)))) h)) g) h)) (sqrt.f64 #s(literal -1 binary64))) h)))
#s(approx (sqrt (- (* g g) (* h h))) (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)))
#s(approx (sqrt (- (* g g) (* h h))) (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g g)) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))) h)))
#s(approx (sqrt (- (* g g) (* h h))) (neg.f64 (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g g)) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) h)))
#s(approx (sqrt (- (* g g) (* h h))) (neg.f64 (*.f64 (+.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 g #s(literal 6 binary64))) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 g g)) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) h)))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (neg.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (cbrt.f64 (pow.f64 (*.f64 (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)) a) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g)) (cbrt.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h)) #s(literal -1/2 binary64)))) h)))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (/.f64 h (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)) a)))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g)))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h)) #s(literal -1/2 binary64)))) h)))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (neg.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (cbrt.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 h h))))) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) a)) (*.f64 (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) a)) #s(literal 1/3 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64)))) #s(literal 1/6 binary64))) h)) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) a) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) g)))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) (*.f64 h h)) #s(literal -1/2 binary64)))) h)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (neg.f64 (*.f64 (-.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) #s(literal -1/2 binary64)) (*.f64 (/.f64 (/.f64 g a) h) #s(literal -1/2 binary64))) h)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (/.f64 g a) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 g g)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) h) a))) h)) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) #s(literal 1/2 binary64))) h)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 g g)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 h h) a) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 g a))) h)) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) a) #s(literal 1/2 binary64))) h)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (neg.f64 (*.f64 (-.f64 (/.f64 g h) (sqrt.f64 #s(literal -1 binary64))) h)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g g)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) h)) g) h)) (sqrt.f64 #s(literal -1 binary64))) h)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (neg.f64 (*.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal 4 binary64))) (*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)) (*.f64 h h))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g g)) (sqrt.f64 #s(literal -1 binary64)))) h)) g) h)) (sqrt.f64 #s(literal -1 binary64))) 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))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))
#s(approx (/ 1 (* 2 a)) (/.f64 #s(literal 1/2 binary64) a))
#s(approx (* 2 a) (*.f64 a #s(literal 2 binary64)))
#s(approx a a)
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64)))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))))

eval45.0ms (0.5%)

Memory
27.7MiB live, 72.4MiB allocated; 5ms collecting garbage
Compiler

Compiled 21 380 to 2 291 computations (89.3% saved)

prune26.0ms (0.3%)

Memory
3.0MiB live, 49.2MiB allocated; 3ms collecting garbage
Pruning

18 alts after pruning (18 fresh and 0 done)

PrunedKeptTotal
New33618354
Fresh000
Picked101
Done000
Total33718355
Accuracy
80.8%
Counts
355 → 18
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.5%
(+.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))) #s(literal 1/3 binary64)) (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)))))))
43.6%
(+.f64 (*.f64 (cbrt.f64 (/.f64 #s(literal 1/2 binary64) a)) (cbrt.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) (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)))))))
27.1%
(+.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (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)))))))
45.3%
(+.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)))))) (*.f64 (cbrt.f64 (/.f64 #s(literal 1/2 binary64) a)) (cbrt.f64 (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))
10.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 (pow.f64 (*.f64 g g) #s(literal 3 binary64)) (pow.f64 (*.f64 h h) #s(literal 3 binary64))) (+.f64 (pow.f64 g #s(literal 4 binary64)) (+.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (*.f64 g h) #s(literal 2 binary64))))))))))
17.3%
(+.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 #s(approx (- (* g g) (* h h)) (*.f64 (-.f64 (/.f64 (*.f64 g g) (*.f64 h h)) #s(literal 1 binary64)) (*.f64 h h))))))))
19.1%
(+.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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))))
26.6%
(+.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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
28.8%
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))))) (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)))))))
24.5%
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) #s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (/.f64 (*.f64 h h) g) #s(literal -1/2 binary64))))) (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)))))))
23.4%
(+.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))) (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)))))))
24.1%
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (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)))))))
18.8%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
52.6%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 5 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (/.f64 g a)))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))))
40.6%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
32.3%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 (+.f64 (*.f64 (cbrt.f64 #s(literal -1/4 binary64)) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) (pow.f64 g #s(literal 4 binary64))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))))) g))
16.9%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 (neg.f64 g) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1 binary64))) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (cbrt.f64 (*.f64 (*.f64 g g) (/.f64 (pow.f64 h #s(literal 8 binary64)) a)))))) (pow.f64 g #s(literal 3 binary64))))) g)) (*.f64 (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))) #s(literal 1 binary64)))))
72.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))))))) (neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
Compiler

Compiled 1 942 to 1 206 computations (37.9% saved)

series342.0ms (3.9%)

Memory
-50.9MiB live, 395.3MiB allocated; 106ms collecting garbage
Counts
60 → 681
Calls
Call 1
Inputs
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
(neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))
(*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))
(cbrt.f64 (/.f64 g a))
(/.f64 g a)
g
a
#s(literal 1 binary64)
(+.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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
(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))
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))
(neg.f64 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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))
(/.f64 (neg.f64 g) 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))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
(/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a)
(+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))))
(cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))
(*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))
(-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)
(sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))
(*.f64 (+.f64 g h) (-.f64 g h))
(+.f64 g h)
(-.f64 g h)
(*.f64 a a)
#s(literal 1/2 binary64)
(cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))
(*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))
(+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)
#s(literal -1/2 binary64)
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (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)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64))))
(*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))
(cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g))
(/.f64 (/.f64 (*.f64 h h) a) g)
(/.f64 (*.f64 h h) a)
(cbrt.f64 #s(literal -1/4 binary64))
#s(literal -1/4 binary64)
(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))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))))) (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) (exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))))
(+.f64 (neg.f64 g) (exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))
(*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64))
(log.f64 (*.f64 (+.f64 g h) (-.f64 g 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 (neg (* (cbrt (/ g a)) 1)) #s(hole binary64 (* -1 (cbrt (/ g a)))))
#s(approx (* (cbrt (/ g a)) 1) #s(hole binary64 (cbrt (/ g a))))
#s(approx (cbrt (/ g a)) #s(hole binary64 (cbrt (/ g a))))
#s(approx (/ g a) #s(hole binary64 (/ g a)))
#s(approx g #s(hole binary64 g))
#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 (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) a) #s(hole binary64 (* -1 (/ g a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))) (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))))))))))) (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* 1/2 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* 1/2 (* (pow a 2) (* h (sqrt -1)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* 1/4 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))) (* 1/2 (* (pow a 2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* 1/2 (* (pow a 2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))) (* g (+ (* -1/8 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/4 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (* h (sqrt -1)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* (pow a 2) (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))) (* (pow a 2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* g (+ (* -1/4 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))))) (* (pow a 2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (sqrt -1))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)) (* h (sqrt -1)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 1)) (* h (sqrt -1)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))) 1)) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* 1/2 (/ (* g (+ h (* -1 h))) (* h (sqrt -1)))) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))))))) (* h (sqrt -1)))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* -1 (pow h 2))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* -1 (pow h 2)) (* g (+ h (* -1 h))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* -1 (pow h 2)) (* g (+ g (+ h (* -1 h)))))))
#s(approx (+ g h) #s(hole binary64 h))
#s(approx (+ g h) #s(hole binary64 (+ g h)))
#s(approx (- g h) #s(hole binary64 (* -1 h)))
#s(approx (- g h) #s(hole binary64 (- g h)))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1/2 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* -1/2 (* (pow a 2) (* h (sqrt -1)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* -1/2 (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* -1/4 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* -1/2 (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* g (+ (* -1/4 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/8 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (* h (sqrt -1)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* (pow a 2) (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))) (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* g (+ (* -1/4 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))))) (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (sqrt -1))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (+ 1 (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))))) (* h (sqrt -1)))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (cbrt -1/4))))
#s(approx (cbrt (/ (/ (* h h) a) g)) #s(hole binary64 (cbrt (/ (pow h 2) (* a g)))))
#s(approx (/ (/ (* h h) a) g) #s(hole binary64 (/ (pow h 2) (* a g))))
#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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 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 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 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 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 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) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt 1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* 1/2 (/ (* h (sqrt -1)) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (+ (* 1/2 (* g (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* 1/2 (/ (* h (sqrt -1)) a)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (+ (* 1/2 (/ (* h (sqrt -1)) a)) (* g (+ (* 1/4 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* h (sqrt -1))))) (* 1/2 (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (+ (* 1/2 (/ (* h (sqrt -1)) a)) (* g (+ (* 1/2 (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (* g (+ (* -1/8 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (+ (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)) (* h (sqrt -1)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 1)) (* h (sqrt -1)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))) 1)) (* h (sqrt -1)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* h (sqrt -1))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* g (+ h (* -1 h))) (* h (sqrt -1)))) (* h (sqrt -1)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))))))) (* h (sqrt -1)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (* 1/2 (log (* -1 (pow h 2))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* g (+ h (* -1 h))) (pow h 2))) (* 1/2 (log (* -1 (pow h 2)))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* 1/2 (log (* -1 (pow h 2)))) (* g (+ (* -1/2 (/ (+ h (* -1 h)) (pow h 2))) (* 1/4 (* g (- (* -1 (/ (pow (+ h (* -1 h)) 2) (pow h 4))) (* 2 (/ 1 (pow h 2)))))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* 1/2 (log (* -1 (pow h 2)))) (* g (+ (* -1/2 (/ (+ h (* -1 h)) (pow h 2))) (* g (+ (* 1/12 (* g (+ (* -6 (/ (+ h (* -1 h)) (pow h 4))) (* -2 (/ (pow (+ h (* -1 h)) 3) (pow h 6)))))) (* 1/4 (- (* -1 (/ (pow (+ h (* -1 h)) 2) (pow h 4))) (* 2 (/ 1 (pow h 2))))))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (log (* -1 (pow h 2)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log (* -1 (pow h 2))) (* -1 (/ (* g (+ h (* -1 h))) (pow h 2))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log (* -1 (pow h 2))) (* g (+ (* -1 (/ (+ h (* -1 h)) (pow h 2))) (* 1/2 (* g (- (* -1 (/ (pow (+ h (* -1 h)) 2) (pow h 4))) (* 2 (/ 1 (pow h 2)))))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log (* -1 (pow h 2))) (* g (+ (* -1 (/ (+ h (* -1 h)) (pow h 2))) (* g (+ (* 1/6 (* g (+ (* -6 (/ (+ h (* -1 h)) (pow h 4))) (* -2 (/ (pow (+ h (* -1 h)) 3) (pow h 6)))))) (* 1/2 (- (* -1 (/ (pow (+ h (* -1 h)) 2) (pow h 4))) (* 2 (/ 1 (pow h 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)))))
#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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* g (+ (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (/ (pow (cbrt 1/2) 2) g)) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (/ (pow (cbrt 1/2) 2) g)) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (/ (pow (cbrt 1/2) 2) g)) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2))))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (cbrt 1/2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/2 (* (pow a 2) (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow (+ h (* -1 h)) 2))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow (+ h (* -1 h)) 5)) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))))))))) (* (pow g 3) (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (cbrt 1/2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* 1/4 (* (pow a 2) (+ h (* -1 h))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (+ (* 1/4 (* (pow a 2) (+ h (* -1 h)))) (* 1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (+ (* -1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 2))) (+ (* 1/4 (* (pow a 2) (+ h (* -1 h)))) (* 1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow a 2) (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))) (pow g 3))) (+ (* -1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 2))) (+ (* 1/4 (* (pow a 2) (+ h (* -1 h)))) (* 1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* 1/2 (* (pow a 2) (+ h (* -1 h))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (+ h (* -1 h)))) (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 2))) (+ (* 1/2 (* (pow a 2) (+ h (* -1 h)))) (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a 2) (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))) (pow g 3))) (+ (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 2))) (+ (* 1/2 (* (pow a 2) (+ h (* -1 h)))) (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* 1/2 (+ h (* -1 h)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (pow g 3))) (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 g))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (pow g 2)))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (+ (* -1 (/ h g)) (/ h g))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (+ (* -1 (/ h g)) (+ (* -1 (/ (pow h 2) (pow g 2))) (/ h g)))))))
#s(approx (+ g h) #s(hole binary64 g))
#s(approx (+ g h) #s(hole binary64 (* g (+ 1 (/ h g)))))
#s(approx (- g h) #s(hole binary64 g))
#s(approx (- g h) #s(hole binary64 (* g (+ 1 (* -1 (/ h g))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 8))) (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2))))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* g (+ (* -1/12 (* (cbrt (/ (pow a 2) (pow g 11))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 8))) (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* (pow a 2) g))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* g (+ (* -1 (pow a 2)) (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* g (+ (* -1 (pow a 2)) (+ (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* -1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* g (+ (* -1 (pow a 2)) (+ (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)) (+ (* -1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (* 1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 3)))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* 2 (* (pow a 2) g))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* g (+ (* 1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* 2 (pow a 2))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* g (+ (* 1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (+ (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (* 2 (pow a 2)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* g (+ (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 3))) (+ (* 1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (+ (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (* 2 (pow a 2))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* 2 g)))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* g (+ 2 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* g (+ 2 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* g (+ 2 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* (cbrt (/ (+ h (* -1 h)) a)) (pow (cbrt 1/2) 2))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (pow (cbrt 1/2) 2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (cbrt 1/2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (pow (cbrt 1/2) 2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) a)) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 5))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))))))))) (* (pow g 3) (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (cbrt 1/2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (pow (cbrt 1/2) 2)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* 1/4 (/ (+ h (* -1 h)) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (+ (* 1/4 (/ (+ h (* -1 h)) a)) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (+ (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 2)))) (+ (* 1/4 (/ (+ h (* -1 h)) a)) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (+ (* -1/4 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (* a (pow g 3)))) (+ (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 2)))) (+ (* 1/4 (/ (+ h (* -1 h)) a)) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* 1/2 (+ h (* -1 h)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (pow g 3))) (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 g))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* g (+ 1 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (* -1 (log (/ 1 g)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (log (/ 1 g))) (* 1/2 (/ (+ h (* -1 h)) g)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (log (/ 1 g))) (+ (* 1/4 (/ (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))) (pow g 2))) (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (log (/ 1 g))) (+ (* 1/12 (/ (+ (* 2 (pow (+ h (* -1 h)) 3)) (* 6 (* (pow h 2) (+ h (* -1 h))))) (pow g 3))) (+ (* 1/4 (/ (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))) (pow g 2))) (* 1/2 (/ (+ h (* -1 h)) g)))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (* -2 (log (/ 1 g)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (* -2 (log (/ 1 g))) (+ (* -1 (/ h g)) (/ h g)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (* -2 (log (/ 1 g))) (+ (* -1 (/ h g)) (+ (* 1/2 (/ (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))) (pow g 2))) (/ h g))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (* -2 (log (/ 1 g))) (+ (* -1 (/ h g)) (+ (* 1/6 (/ (+ (* 2 (pow (+ h (* -1 h)) 3)) (* 6 (* (pow h 2) (+ h (* -1 h))))) (pow g 3))) (+ (* 1/2 (/ (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))) (pow g 2))) (/ h 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 (* -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 (neg (* (cbrt (/ g a)) 1)) #s(hole binary64 (* (cbrt (/ g a)) (cbrt -1))))
#s(approx (* (cbrt (/ g a)) 1) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#s(approx (cbrt (/ g a)) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* g (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))) a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* g (+ 1 (pow (sqrt -1) 2))))) (cbrt 1/2)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ (pow a 2) (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) g) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) g) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1/2 (* (pow a 2) (* g (+ 1 (pow (sqrt -1) 2)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1 (* g (+ (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* 1/2 (* (pow a 2) (+ 1 (pow (sqrt -1) 2)))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/4 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g)) (* 1/4 (* (pow a 2) (+ h (* -1 h))))) g)) (* 1/2 (* (pow a 2) (+ 1 (pow (sqrt -1) 2)))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2)))) (* 1/4 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/4 (* (pow a 2) (+ h (* -1 h))))) g)) (* 1/2 (* (pow a 2) (+ 1 (pow (sqrt -1) 2)))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* g (+ 1 (pow (sqrt -1) 2)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* (pow a 2) (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (pow (sqrt -1) 2))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (pow (sqrt -1) 2)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (* -1 (/ (+ (* -1 (+ h (* -1 h))) (/ (pow h 2) g)) g))))))
#s(approx (+ g h) #s(hole binary64 (* -1 (* g (- (* -1 (/ h g)) 1)))))
#s(approx (- g h) #s(hole binary64 (* -1 (* g (- (/ h g) 1)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* g (- (pow (sqrt -1) 2) 1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ (pow a 2) (* (pow g 5) (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) g) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) g) (pow (- (pow (sqrt -1) 2) 1) 2))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* 1/2 (* (pow a 2) (* g (- (pow (sqrt -1) 2) 1))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* g (+ (* -1/2 (* (pow a 2) (- (pow (sqrt -1) 2) 1))) (* 1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/4 (* (pow a 2) (+ h (* -1 h)))) (* 1/4 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g))) g)) (* -1/2 (* (pow a 2) (- (pow (sqrt -1) 2) 1))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* -1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2))))) g)) (* -1/4 (* (pow a 2) (+ h (* -1 h))))) g)) (* -1/2 (* (pow a 2) (- (pow (sqrt -1) 2) 1))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* g (- (pow (sqrt -1) 2) 1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* (pow a 2) (- (pow (sqrt -1) 2) 1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (- (pow (sqrt -1) 2) 1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (- (pow (sqrt -1) 2) 1)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (pow (sqrt -1) 2) 1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (* (pow (cbrt -1) 2) (cbrt -1/4)))))
#s(approx (cbrt (/ (/ (* h h) a) g)) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (pow (cbrt -1) 2))))
#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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 2)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/24 (* (cbrt (/ (* (pow g 2) (pow h 8)) a)) (/ 1 (cbrt 1/2)))) (* 1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (cbrt 1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2))))) (pow g 3))) (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 2)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ g a)) (/ (* (cbrt 1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* -1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2))))) (pow g 3))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ g a)) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow (cbrt 2) 2)))) (* 1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (cbrt 1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2))))) g)) (* -1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2))))) (pow g 3))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (/ g a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (* g (+ (* 1/4 (/ (+ h (* -1 h)) (* a g))) (/ 1 a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/4 (/ (+ h (* -1 h)) a)) (* -1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g)))) g)) (/ 1 a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a g))) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) a))) g)) (* -1/4 (/ (+ h (* -1 h)) a))) g)) (/ 1 a))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -2 g)))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* g (+ 2 (* 1/2 (/ (+ h (* -1 h)) g)))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* g (+ 2 (* -1 (/ (+ (* -1/2 (+ h (* -1 h))) (* -1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g))) g)))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* g (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)) (* 1/2 (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) g)) (* -1/2 (+ h (* -1 h)))) g)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 g)))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) g)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* g (+ 1 (* -1 (/ (+ (* -1/2 (+ h (* -1 h))) (* -1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g))) g)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* g (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)) (* 1/2 (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) g)) (* -1/2 (+ h (* -1 h)))) g)))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (* -1 (log (/ -1 g)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (log (/ -1 g))) (* 1/2 (/ (+ h (* -1 h)) g)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (log (/ -1 g))) (* -1 (/ (+ (* -1/2 (+ h (* -1 h))) (* -1/4 (/ (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))) g))) g)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (log (/ -1 g))) (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (/ (+ (* -6 (* (pow h 2) (+ h (* -1 h)))) (* -2 (pow (+ h (* -1 h)) 3))) g)) (* 1/4 (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))))) g)) (* -1/2 (+ h (* -1 h)))) g)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (* -2 (log (/ -1 g)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (* -2 (log (/ -1 g))) (+ (* -1 (/ h g)) (/ h g)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (* -2 (log (/ -1 g))) (* -1 (/ (+ (* -1 (+ h (* -1 h))) (* -1/2 (/ (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))) g))) g)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (* -2 (log (/ -1 g))) (* -1 (/ (+ (* -1 (+ h (* -1 h))) (* -1 (/ (+ (* -1/6 (/ (+ (* -6 (* (pow h 2) (+ h (* -1 h)))) (* -2 (pow (+ h (* -1 h)) 3))) g)) (* 1/2 (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))))) g))) 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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* a (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* (pow a 2) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* 1/12 (* (/ (* (pow a 2) (* (pow h 3) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (pow h 3) (+ (* -1/6 (* (/ (* (pow a 2) (* h (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/12 (* (/ (* (pow a 2) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (pow h 3) (+ (* 1/12 (* (/ (* (pow a 2) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* h (+ (* -1/6 (* (/ (* (pow a 2) (* h (* (cbrt 1/2) (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4))))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* -1/6 (* (/ (* (pow a 2) (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* 1/4 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/4 (/ (* (pow a 2) (+ g (* -1 g))) g))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* h (+ (* 1/4 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/8 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* h (+ (* 1/4 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) g)) (* 1/8 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/4 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) g)) (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* 1/2 (/ (* h (+ g (* -1 g))) g))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* h (+ (* -1/2 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) g)) (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (pow g 3)))))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* 1/2 (/ (* h (+ g (* -1 g))) g)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* h (+ g (* -1 g))) (pow g 2))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* h (+ g (+ (* -1 g) (* -1 h)))) (pow g 2))))
#s(approx (- g h) #s(hole binary64 (+ g (* -1 h))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))))))))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1 (* (pow a 2) g)) (* -1/4 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1 (* (pow a 2) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* 1/4 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1 (* (pow a 2) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/8 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3))) (* 1/4 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)) (* 2 (* (pow a 2) g)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 2 (* (pow a 2) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 2 (* (pow a 2) g)) (* h (+ (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/4 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3))))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 1/2 (/ (* h (+ g (* -1 g))) g)) (* 2 g))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 2 g) (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 2 g) (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (/ (* h h) a) #s(hole binary64 (/ (pow h 2) a)))
#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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (+ (* (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)))) (* 1/12 (* (/ (* h (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2)))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (+ (* (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)))) (* h (+ (* 1/12 (* (/ (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* h (+ (* -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/6 (* (/ (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2)))))))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* 1/12 (* (/ (* (pow h 3) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (pow h 3) (+ (* -1/6 (* (/ (* h (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/12 (* (/ (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (pow h 3) (+ (* 1/12 (* (/ (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* h (+ (* -1/6 (* (/ (* h (* (cbrt 1/2) (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4)))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* -1/6 (* (/ (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* h (+ (* -1/4 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (+ g (* -1 g)) (* a g)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* h (+ (* 1/4 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/4 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/8 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* h (+ (* 1/4 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/4 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* h (+ (* -1/4 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g))) (* 1/8 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))))))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* 1/2 (/ (* h (+ g (* -1 g))) g))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* h (+ (* -1/2 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) g)) (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (pow g 3)))))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (+ g (* 1/2 (/ (* h (+ g (* -1 g))) g)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (+ g (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (+ g (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (* 1/2 (log (pow g 2)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* 1/4 (* (pow h 2) (- (* -1 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (* 2 (/ 1 (pow g 2)))))) (* 1/2 (log (pow g 2))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow g 2))) (* (pow h 2) (+ (* 1/12 (* h (+ (* 2 (/ (pow (+ g (* -1 g)) 3) (pow g 6))) (* 6 (/ (+ g (* -1 g)) (pow g 4)))))) (* 1/4 (- (* -1 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (* 2 (/ 1 (pow g 2))))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow g 2))) (* (pow h 2) (+ (* 1/4 (- (* -1 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (* 2 (/ 1 (pow g 2))))) (* h (+ (* 1/48 (* h (- (+ (* -24 (/ (pow (+ g (* -1 g)) 2) (pow g 6))) (* -6 (/ (pow (+ g (* -1 g)) 4) (pow g 8)))) (* 12 (/ 1 (pow g 4)))))) (* 1/12 (+ (* 2 (/ (pow (+ g (* -1 g)) 3) (pow g 6))) (* 6 (/ (+ g (* -1 g)) (pow g 4))))))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (log (pow g 2))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log (pow g 2)) (* 1/2 (* (pow h 2) (- (* -1 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (* 2 (/ 1 (pow g 2)))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log (pow g 2)) (* (pow h 2) (+ (* 1/6 (* h (+ (* 2 (/ (pow (+ g (* -1 g)) 3) (pow g 6))) (* 6 (/ (+ g (* -1 g)) (pow g 4)))))) (* 1/2 (- (* -1 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (* 2 (/ 1 (pow g 2))))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log (pow g 2)) (* (pow h 2) (+ (* 1/2 (- (* -1 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (* 2 (/ 1 (pow g 2))))) (* h (+ (* 1/24 (* h (- (+ (* -24 (/ (pow (+ g (* -1 g)) 2) (pow g 6))) (* -6 (/ (pow (+ g (* -1 g)) 4) (pow g 8)))) (* 12 (/ 1 (pow g 4)))))) (* 1/6 (+ (* 2 (/ (pow (+ g (* -1 g)) 3) (pow g 6))) (* 6 (/ (+ g (* -1 g)) (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 (* 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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* h (+ (* 1/2 (* (pow a 2) (sqrt -1))) (* 1/2 (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* h (+ (* 1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* 1/2 (* (pow a 2) (sqrt -1))) (* 1/2 (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* h (+ (* -1/8 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* 1/2 (* (pow a 2) (sqrt -1))) (* 1/2 (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (- (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))) (/ g h)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))) (/ g h)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))) (/ g h)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (+ (* -1 (/ g h)) (/ g h)) 1))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (+ (* -1 (/ g h)) (+ (/ g h) (/ (pow g 2) (pow h 2)))) 1))))
#s(approx (+ g h) #s(hole binary64 (* h (+ 1 (/ g h)))))
#s(approx (- g h) #s(hole binary64 (* h (- (/ g h) 1))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (* -1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (+ (* -1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)) (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (+ (* -1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)) (+ (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (* 1/8 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3))))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (/ g h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))) (/ g h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))) (/ g h))))))))
#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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -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 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -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 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* h (+ (* 1/2 (/ (sqrt -1) a)) (* 1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* h (+ (* 1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (+ (* 1/2 (/ (sqrt -1) a)) (* 1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* h (+ (* -1/8 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (+ (* 1/2 (/ (sqrt -1) a)) (* 1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (- (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))) (/ g h)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))) (/ g h)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))) (/ g h)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* h (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (* 1/2 (+ (log -1) (* -2 (log (/ 1 h)))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1/2 (/ (+ g (* -1 g)) h)) (* 1/2 (+ (log -1) (* -2 (log (/ 1 h))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1/2 (/ (+ g (* -1 g)) h)) (+ (* 1/4 (/ (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))) (pow h 2))) (* 1/2 (+ (log -1) (* -2 (log (/ 1 h)))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1/2 (/ (+ g (* -1 g)) h)) (+ (* 1/12 (/ (+ (* -6 (* (pow g 2) (+ g (* -1 g)))) (* -2 (pow (+ g (* -1 g)) 3))) (pow h 3))) (+ (* 1/4 (/ (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))) (pow h 2))) (* 1/2 (+ (log -1) (* -2 (log (/ 1 h))))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (* -2 (log (/ 1 h))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (+ (* -2 (log (/ 1 h))) (* -1 (/ (+ g (* -1 g)) h))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (+ (* -2 (log (/ 1 h))) (+ (* -1 (/ (+ g (* -1 g)) h)) (* 1/2 (/ (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))) (pow h 2))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (+ (* -2 (log (/ 1 h))) (+ (* -1 (/ (+ g (* -1 g)) h)) (+ (* 1/6 (/ (+ (* -6 (* (pow g 2) (+ g (* -1 g)))) (* -2 (pow (+ g (* -1 g)) 3))) (pow h 3))) (* 1/2 (/ (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))) (pow h 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 (+ (* (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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (pow h 3))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (pow h 3))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 11))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 11))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (pow h 3))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 11))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1/2 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1 (* h (+ (* -1/2 (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)) (* 1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))) (* 1/2 (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) h)) (* 1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3)))) (* 1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1)))) h)) (* 1/2 (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) h)) (* 1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))) (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1)))) h)) (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) h)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (* -1 (/ (+ g (* -1 g)) h)) 1))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (* -1 (/ (+ g (+ (* -1 g) (* -1 (/ (pow g 2) h)))) h)) 1))))
#s(approx (+ g h) #s(hole binary64 (* -1 (* h (- (* -1 (/ g h)) 1)))))
#s(approx (- g h) #s(hole binary64 (* -1 (* h (+ 1 (* -1 (/ g h)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 11))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* 1/2 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (* 1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))) (* 1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))) h)) (* -1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1))) (* -1/8 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3))))) h)) (* -1/2 (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) h)) (* -1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))) (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1)))) h)) (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) #s(hole binary64 (* -1 (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (cbrt -1/4))))))
#s(approx (cbrt (/ (/ (* h h) a) g)) #s(hole binary64 (* -1 (* (cbrt (/ (pow h 2) (* a g))) (cbrt -1)))))
#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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt -1/2))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt -1/2)))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1/2 (/ (* h (sqrt -1)) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* h (sqrt -1))))) (* 1/2 (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* h (pow (sqrt -1) 3))))) (* 1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (sqrt -1))))) h)) (* 1/2 (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) h)))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (* 1/2 (+ (log -1) (* -2 (log (/ -1 h)))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* 1/2 (+ (log -1) (* -2 (log (/ -1 h))))) (* 1/2 (/ (+ g (* -1 g)) h)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (+ g (* -1 g))) (* -1/4 (/ (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))) h))) h)) (* 1/2 (+ (log -1) (* -2 (log (/ -1 h))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (/ (+ (* -6 (* (pow g 2) (+ g (* -1 g)))) (* -2 (pow (+ g (* -1 g)) 3))) h)) (* 1/4 (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))))) h)) (* -1/2 (+ g (* -1 g)))) h)) (* 1/2 (+ (log -1) (* -2 (log (/ -1 h))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (* -2 (log (/ -1 h))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (+ (* -2 (log (/ -1 h))) (+ (* -1 (/ g h)) (/ g h))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (+ (* -2 (log (/ -1 h))) (* -1 (/ (+ (* -1 (+ g (* -1 g))) (* -1/2 (/ (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))) h))) h))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (+ (* -2 (log (/ -1 h))) (* -1 (/ (+ (* -1 (+ g (* -1 g))) (* -1 (/ (+ (* -1/6 (/ (+ (* -6 (* (pow g 2) (+ g (* -1 g)))) (* -2 (pow (+ g (* -1 g)) 3))) h)) (* 1/2 (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))))) h))) 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 (/ (+ (* (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 a #s(hole binary64 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 (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2))) a)))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* 1/2 (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1/2 (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 (* (+ g h) (- g h))) g))) (cbrt 1/2))) a)))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* 1/2 (/ (- (sqrt (* (+ g h) (- g h))) g) 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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2)))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* a (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 (* (+ g h) (- g h))) 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 (neg (* (cbrt (/ g a)) 1)) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (pow (cbrt -1) 2)))))
#s(approx (* (cbrt (/ g a)) 1) #s(hole binary64 (* (cbrt (/ g a)) (pow (cbrt -1) 2))))
#s(approx (cbrt (/ g a)) #s(hole binary64 (* (cbrt (/ g a)) (pow (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)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (cbrt -1) (cbrt -1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt 1/2)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* a (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (cbrt -1) (cbrt -1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt 1/2))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (* (cbrt -1) (cbrt 1/2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (* (cbrt -1) (cbrt -1/2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt -1/2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt -1/2)))))
Calls

9 calls:

TimeVariablePointExpression
59.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))))))) (neg (* (cbrt (/ g a)) 1)) (* (cbrt (/ g a)) 1) (cbrt (/ g a)) (/ g a) g a 1 (+ (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)) (* 2 a) 2 (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg 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) a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (- (sqrt (* (+ g h) (- g h))) g) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g h) (* a a) 1/2 (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+ (sqrt (* (+ g h) (- g h))) g) -1/2 (+ (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)))))) (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (cbrt (/ (/ (* h h) a) g)) (/ (/ (* h h) a) g) (/ (* h h) a) (cbrt -1/4) -1/4 (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)))) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (exp (* (log (* (+ g h) (- g h))) 1/2)) (* (log (* (+ g h) (- g h))) 1/2) (log (* (+ g h) (- g h))))
53.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))))))) (neg (* (cbrt (/ g a)) 1)) (* (cbrt (/ g a)) 1) (cbrt (/ g a)) (/ g a) g a 1 (+ (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)) (* 2 a) 2 (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg 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) a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (- (sqrt (* (+ g h) (- g h))) g) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g h) (* a a) 1/2 (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+ (sqrt (* (+ g h) (- g h))) g) -1/2 (+ (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)))))) (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (cbrt (/ (/ (* h h) a) g)) (/ (/ (* h h) a) g) (/ (* h h) a) (cbrt -1/4) -1/4 (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)))) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (exp (* (log (* (+ g h) (- g h))) 1/2)) (* (log (* (+ g h) (- g h))) 1/2) (log (* (+ g h) (- g h))))
47.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))))))) (neg (* (cbrt (/ g a)) 1)) (* (cbrt (/ g a)) 1) (cbrt (/ g a)) (/ g a) g a 1 (+ (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)) (* 2 a) 2 (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg 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) a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (- (sqrt (* (+ g h) (- g h))) g) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g h) (* a a) 1/2 (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+ (sqrt (* (+ g h) (- g h))) g) -1/2 (+ (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)))))) (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (cbrt (/ (/ (* h h) a) g)) (/ (/ (* h h) a) g) (/ (* h h) a) (cbrt -1/4) -1/4 (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)))) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (exp (* (log (* (+ g h) (- g h))) 1/2)) (* (log (* (+ g h) (- g h))) 1/2) (log (* (+ g h) (- g h))))
32.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))))))) (neg (* (cbrt (/ g a)) 1)) (* (cbrt (/ g a)) 1) (cbrt (/ g a)) (/ g a) g a 1 (+ (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)) (* 2 a) 2 (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg 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) a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (- (sqrt (* (+ g h) (- g h))) g) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g h) (* a a) 1/2 (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+ (sqrt (* (+ g h) (- g h))) g) -1/2 (+ (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)))))) (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (cbrt (/ (/ (* h h) a) g)) (/ (/ (* h h) a) g) (/ (* h h) a) (cbrt -1/4) -1/4 (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)))) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (exp (* (log (* (+ g h) (- g h))) 1/2)) (* (log (* (+ g h) (- g h))) 1/2) (log (* (+ g h) (- g h))))
27.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))))))) (neg (* (cbrt (/ g a)) 1)) (* (cbrt (/ g a)) 1) (cbrt (/ g a)) (/ g a) g a 1 (+ (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)) (* 2 a) 2 (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg 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) a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (- (sqrt (* (+ g h) (- g h))) g) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g h) (* a a) 1/2 (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+ (sqrt (* (+ g h) (- g h))) g) -1/2 (+ (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)))))) (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (cbrt (/ (/ (* h h) a) g)) (/ (/ (* h h) a) g) (/ (* h h) a) (cbrt -1/4) -1/4 (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)))) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (exp (* (log (* (+ g h) (- g h))) 1/2)) (* (log (* (+ g h) (- g h))) 1/2) (log (* (+ g h) (- g h))))

rewrite416.0ms (4.7%)

Memory
37.1MiB live, 548.0MiB allocated; 87ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04216206158472205
0431149893
01290749623
Stop Event
iter limit
node limit
iter limit
Counts
741 → 799
Calls
Call 1
Inputs
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
(neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))
(*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))
(cbrt.f64 (/.f64 g a))
(/.f64 g a)
g
a
#s(literal 1 binary64)
(+.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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
(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))
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))
(neg.f64 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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))
(/.f64 (neg.f64 g) 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))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
(/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a)
(+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))))
(cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))
(*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))
(-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)
(sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))
(*.f64 (+.f64 g h) (-.f64 g h))
(+.f64 g h)
(-.f64 g h)
(*.f64 a a)
#s(literal 1/2 binary64)
(cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))
(*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))
(+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)
#s(literal -1/2 binary64)
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (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)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64))))
(*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))
(cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g))
(/.f64 (/.f64 (*.f64 h h) a) g)
(/.f64 (*.f64 h h) a)
(cbrt.f64 #s(literal -1/4 binary64))
#s(literal -1/4 binary64)
(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))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))))) (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) (exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))))
(+.f64 (neg.f64 g) (exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))
(*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64))
(log.f64 (*.f64 (+.f64 g h) (-.f64 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 (+ (* (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 (neg (* (cbrt (/ g a)) 1)) #s(hole binary64 (* -1 (cbrt (/ g a)))))
#s(approx (* (cbrt (/ g a)) 1) #s(hole binary64 (cbrt (/ g a))))
#s(approx (cbrt (/ g a)) #s(hole binary64 (cbrt (/ g a))))
#s(approx (/ g a) #s(hole binary64 (/ g a)))
#s(approx g #s(hole binary64 g))
#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 (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) a) #s(hole binary64 (* -1 (/ g a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))) (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))))))))))) (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* 1/2 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* 1/2 (* (pow a 2) (* h (sqrt -1)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* 1/4 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))) (* 1/2 (* (pow a 2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* 1/2 (* (pow a 2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))) (* g (+ (* -1/8 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/4 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (* h (sqrt -1)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* (pow a 2) (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))) (* (pow a 2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* g (+ (* -1/4 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))))) (* (pow a 2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (sqrt -1))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)) (* h (sqrt -1)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 1)) (* h (sqrt -1)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))) 1)) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* 1/2 (/ (* g (+ h (* -1 h))) (* h (sqrt -1)))) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))))))) (* h (sqrt -1)))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* -1 (pow h 2))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* -1 (pow h 2)) (* g (+ h (* -1 h))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* -1 (pow h 2)) (* g (+ g (+ h (* -1 h)))))))
#s(approx (+ g h) #s(hole binary64 h))
#s(approx (+ g h) #s(hole binary64 (+ g h)))
#s(approx (- g h) #s(hole binary64 (* -1 h)))
#s(approx (- g h) #s(hole binary64 (- g h)))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1/2 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* -1/2 (* (pow a 2) (* h (sqrt -1)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* -1/2 (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* -1/4 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* -1/2 (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* g (+ (* -1/4 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/8 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (* h (sqrt -1)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* (pow a 2) (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))) (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* g (+ (* -1/4 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))))) (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (sqrt -1))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (+ 1 (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))))) (* h (sqrt -1)))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (cbrt -1/4))))
#s(approx (cbrt (/ (/ (* h h) a) g)) #s(hole binary64 (cbrt (/ (pow h 2) (* a g)))))
#s(approx (/ (/ (* h h) a) g) #s(hole binary64 (/ (pow h 2) (* a g))))
#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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 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 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 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 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 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) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt 1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* 1/2 (/ (* h (sqrt -1)) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (+ (* 1/2 (* g (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* 1/2 (/ (* h (sqrt -1)) a)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (+ (* 1/2 (/ (* h (sqrt -1)) a)) (* g (+ (* 1/4 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* h (sqrt -1))))) (* 1/2 (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (+ (* 1/2 (/ (* h (sqrt -1)) a)) (* g (+ (* 1/2 (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (* g (+ (* -1/8 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (+ (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)) (* h (sqrt -1)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 1)) (* h (sqrt -1)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))) 1)) (* h (sqrt -1)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* h (sqrt -1))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* g (+ h (* -1 h))) (* h (sqrt -1)))) (* h (sqrt -1)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))))))) (* h (sqrt -1)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (* 1/2 (log (* -1 (pow h 2))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* g (+ h (* -1 h))) (pow h 2))) (* 1/2 (log (* -1 (pow h 2)))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* 1/2 (log (* -1 (pow h 2)))) (* g (+ (* -1/2 (/ (+ h (* -1 h)) (pow h 2))) (* 1/4 (* g (- (* -1 (/ (pow (+ h (* -1 h)) 2) (pow h 4))) (* 2 (/ 1 (pow h 2)))))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* 1/2 (log (* -1 (pow h 2)))) (* g (+ (* -1/2 (/ (+ h (* -1 h)) (pow h 2))) (* g (+ (* 1/12 (* g (+ (* -6 (/ (+ h (* -1 h)) (pow h 4))) (* -2 (/ (pow (+ h (* -1 h)) 3) (pow h 6)))))) (* 1/4 (- (* -1 (/ (pow (+ h (* -1 h)) 2) (pow h 4))) (* 2 (/ 1 (pow h 2))))))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (log (* -1 (pow h 2)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log (* -1 (pow h 2))) (* -1 (/ (* g (+ h (* -1 h))) (pow h 2))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log (* -1 (pow h 2))) (* g (+ (* -1 (/ (+ h (* -1 h)) (pow h 2))) (* 1/2 (* g (- (* -1 (/ (pow (+ h (* -1 h)) 2) (pow h 4))) (* 2 (/ 1 (pow h 2)))))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log (* -1 (pow h 2))) (* g (+ (* -1 (/ (+ h (* -1 h)) (pow h 2))) (* g (+ (* 1/6 (* g (+ (* -6 (/ (+ h (* -1 h)) (pow h 4))) (* -2 (/ (pow (+ h (* -1 h)) 3) (pow h 6)))))) (* 1/2 (- (* -1 (/ (pow (+ h (* -1 h)) 2) (pow h 4))) (* 2 (/ 1 (pow h 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)))))
#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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* g (+ (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (/ (pow (cbrt 1/2) 2) g)) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (/ (pow (cbrt 1/2) 2) g)) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (/ (pow (cbrt 1/2) 2) g)) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2))))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (cbrt 1/2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/2 (* (pow a 2) (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow (+ h (* -1 h)) 2))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow (+ h (* -1 h)) 5)) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))))))))) (* (pow g 3) (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (cbrt 1/2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* 1/4 (* (pow a 2) (+ h (* -1 h))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (+ (* 1/4 (* (pow a 2) (+ h (* -1 h)))) (* 1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (+ (* -1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 2))) (+ (* 1/4 (* (pow a 2) (+ h (* -1 h)))) (* 1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow a 2) (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))) (pow g 3))) (+ (* -1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 2))) (+ (* 1/4 (* (pow a 2) (+ h (* -1 h)))) (* 1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* 1/2 (* (pow a 2) (+ h (* -1 h))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (+ h (* -1 h)))) (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 2))) (+ (* 1/2 (* (pow a 2) (+ h (* -1 h)))) (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a 2) (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))) (pow g 3))) (+ (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 2))) (+ (* 1/2 (* (pow a 2) (+ h (* -1 h)))) (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* 1/2 (+ h (* -1 h)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (pow g 3))) (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 g))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (pow g 2)))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (+ (* -1 (/ h g)) (/ h g))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (+ (* -1 (/ h g)) (+ (* -1 (/ (pow h 2) (pow g 2))) (/ h g)))))))
#s(approx (+ g h) #s(hole binary64 g))
#s(approx (+ g h) #s(hole binary64 (* g (+ 1 (/ h g)))))
#s(approx (- g h) #s(hole binary64 g))
#s(approx (- g h) #s(hole binary64 (* g (+ 1 (* -1 (/ h g))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 8))) (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2))))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* g (+ (* -1/12 (* (cbrt (/ (pow a 2) (pow g 11))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 8))) (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* (pow a 2) g))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* g (+ (* -1 (pow a 2)) (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* g (+ (* -1 (pow a 2)) (+ (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* -1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* g (+ (* -1 (pow a 2)) (+ (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)) (+ (* -1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (* 1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 3)))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* 2 (* (pow a 2) g))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* g (+ (* 1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* 2 (pow a 2))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* g (+ (* 1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (+ (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (* 2 (pow a 2)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* g (+ (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 3))) (+ (* 1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (+ (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (* 2 (pow a 2))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* 2 g)))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* g (+ 2 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* g (+ 2 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* g (+ 2 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* (cbrt (/ (+ h (* -1 h)) a)) (pow (cbrt 1/2) 2))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (pow (cbrt 1/2) 2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (cbrt 1/2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (pow (cbrt 1/2) 2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) a)) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 5))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))))))))) (* (pow g 3) (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (cbrt 1/2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (pow (cbrt 1/2) 2)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* 1/4 (/ (+ h (* -1 h)) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (+ (* 1/4 (/ (+ h (* -1 h)) a)) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (+ (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 2)))) (+ (* 1/4 (/ (+ h (* -1 h)) a)) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (+ (* -1/4 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (* a (pow g 3)))) (+ (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 2)))) (+ (* 1/4 (/ (+ h (* -1 h)) a)) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* 1/2 (+ h (* -1 h)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (pow g 3))) (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 g))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* g (+ 1 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (* -1 (log (/ 1 g)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (log (/ 1 g))) (* 1/2 (/ (+ h (* -1 h)) g)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (log (/ 1 g))) (+ (* 1/4 (/ (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))) (pow g 2))) (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (log (/ 1 g))) (+ (* 1/12 (/ (+ (* 2 (pow (+ h (* -1 h)) 3)) (* 6 (* (pow h 2) (+ h (* -1 h))))) (pow g 3))) (+ (* 1/4 (/ (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))) (pow g 2))) (* 1/2 (/ (+ h (* -1 h)) g)))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (* -2 (log (/ 1 g)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (* -2 (log (/ 1 g))) (+ (* -1 (/ h g)) (/ h g)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (* -2 (log (/ 1 g))) (+ (* -1 (/ h g)) (+ (* 1/2 (/ (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))) (pow g 2))) (/ h g))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (* -2 (log (/ 1 g))) (+ (* -1 (/ h g)) (+ (* 1/6 (/ (+ (* 2 (pow (+ h (* -1 h)) 3)) (* 6 (* (pow h 2) (+ h (* -1 h))))) (pow g 3))) (+ (* 1/2 (/ (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))) (pow g 2))) (/ h 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 (* -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 (neg (* (cbrt (/ g a)) 1)) #s(hole binary64 (* (cbrt (/ g a)) (cbrt -1))))
#s(approx (* (cbrt (/ g a)) 1) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#s(approx (cbrt (/ g a)) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* g (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))) a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* g (+ 1 (pow (sqrt -1) 2))))) (cbrt 1/2)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ (pow a 2) (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) g) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) g) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1/2 (* (pow a 2) (* g (+ 1 (pow (sqrt -1) 2)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1 (* g (+ (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* 1/2 (* (pow a 2) (+ 1 (pow (sqrt -1) 2)))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/4 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g)) (* 1/4 (* (pow a 2) (+ h (* -1 h))))) g)) (* 1/2 (* (pow a 2) (+ 1 (pow (sqrt -1) 2)))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2)))) (* 1/4 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/4 (* (pow a 2) (+ h (* -1 h))))) g)) (* 1/2 (* (pow a 2) (+ 1 (pow (sqrt -1) 2)))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* g (+ 1 (pow (sqrt -1) 2)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* (pow a 2) (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (pow (sqrt -1) 2))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (pow (sqrt -1) 2)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (* -1 (/ (+ (* -1 (+ h (* -1 h))) (/ (pow h 2) g)) g))))))
#s(approx (+ g h) #s(hole binary64 (* -1 (* g (- (* -1 (/ h g)) 1)))))
#s(approx (- g h) #s(hole binary64 (* -1 (* g (- (/ h g) 1)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* g (- (pow (sqrt -1) 2) 1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ (pow a 2) (* (pow g 5) (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) g) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) g) (pow (- (pow (sqrt -1) 2) 1) 2))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* 1/2 (* (pow a 2) (* g (- (pow (sqrt -1) 2) 1))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* g (+ (* -1/2 (* (pow a 2) (- (pow (sqrt -1) 2) 1))) (* 1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/4 (* (pow a 2) (+ h (* -1 h)))) (* 1/4 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g))) g)) (* -1/2 (* (pow a 2) (- (pow (sqrt -1) 2) 1))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* -1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2))))) g)) (* -1/4 (* (pow a 2) (+ h (* -1 h))))) g)) (* -1/2 (* (pow a 2) (- (pow (sqrt -1) 2) 1))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* g (- (pow (sqrt -1) 2) 1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* (pow a 2) (- (pow (sqrt -1) 2) 1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (- (pow (sqrt -1) 2) 1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (- (pow (sqrt -1) 2) 1)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (pow (sqrt -1) 2) 1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (* (pow (cbrt -1) 2) (cbrt -1/4)))))
#s(approx (cbrt (/ (/ (* h h) a) g)) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (pow (cbrt -1) 2))))
#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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 2)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/24 (* (cbrt (/ (* (pow g 2) (pow h 8)) a)) (/ 1 (cbrt 1/2)))) (* 1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (cbrt 1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2))))) (pow g 3))) (+ (* -1/6 (* (cbrt (/ 1 (* a (pow g 2)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ g a)) (/ (* (cbrt 1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* -1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2))))) (pow g 3))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ g a)) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow (cbrt 2) 2)))) (* 1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (cbrt 1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2))))) g)) (* -1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2))))) (pow g 3))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (/ g a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (* g (+ (* 1/4 (/ (+ h (* -1 h)) (* a g))) (/ 1 a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/4 (/ (+ h (* -1 h)) a)) (* -1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g)))) g)) (/ 1 a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a g))) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) a))) g)) (* -1/4 (/ (+ h (* -1 h)) a))) g)) (/ 1 a))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -2 g)))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* g (+ 2 (* 1/2 (/ (+ h (* -1 h)) g)))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* g (+ 2 (* -1 (/ (+ (* -1/2 (+ h (* -1 h))) (* -1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g))) g)))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* g (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)) (* 1/2 (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) g)) (* -1/2 (+ h (* -1 h)))) g)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 g)))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) g)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* g (+ 1 (* -1 (/ (+ (* -1/2 (+ h (* -1 h))) (* -1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g))) g)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* g (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)) (* 1/2 (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) g)) (* -1/2 (+ h (* -1 h)))) g)))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (* -1 (log (/ -1 g)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (log (/ -1 g))) (* 1/2 (/ (+ h (* -1 h)) g)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (log (/ -1 g))) (* -1 (/ (+ (* -1/2 (+ h (* -1 h))) (* -1/4 (/ (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))) g))) g)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (log (/ -1 g))) (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (/ (+ (* -6 (* (pow h 2) (+ h (* -1 h)))) (* -2 (pow (+ h (* -1 h)) 3))) g)) (* 1/4 (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))))) g)) (* -1/2 (+ h (* -1 h)))) g)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (* -2 (log (/ -1 g)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (* -2 (log (/ -1 g))) (+ (* -1 (/ h g)) (/ h g)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (* -2 (log (/ -1 g))) (* -1 (/ (+ (* -1 (+ h (* -1 h))) (* -1/2 (/ (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))) g))) g)))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (* -2 (log (/ -1 g))) (* -1 (/ (+ (* -1 (+ h (* -1 h))) (* -1 (/ (+ (* -1/6 (/ (+ (* -6 (* (pow h 2) (+ h (* -1 h)))) (* -2 (pow (+ h (* -1 h)) 3))) g)) (* 1/2 (+ (* -2 (pow h 2)) (* -1 (pow (+ h (* -1 h)) 2))))) g))) 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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* a (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* (pow a 2) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* 1/12 (* (/ (* (pow a 2) (* (pow h 3) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (pow h 3) (+ (* -1/6 (* (/ (* (pow a 2) (* h (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/12 (* (/ (* (pow a 2) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (pow h 3) (+ (* 1/12 (* (/ (* (pow a 2) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* h (+ (* -1/6 (* (/ (* (pow a 2) (* h (* (cbrt 1/2) (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4))))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* -1/6 (* (/ (* (pow a 2) (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* 1/4 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/4 (/ (* (pow a 2) (+ g (* -1 g))) g))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* h (+ (* 1/4 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/8 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* h (+ (* 1/4 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) g)) (* 1/8 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/4 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) g)) (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* 1/2 (/ (* h (+ g (* -1 g))) g))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* h (+ (* -1/2 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) g)) (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (pow g 3)))))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* 1/2 (/ (* h (+ g (* -1 g))) g)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* h (+ g (* -1 g))) (pow g 2))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* h (+ g (+ (* -1 g) (* -1 h)))) (pow g 2))))
#s(approx (- g h) #s(hole binary64 (+ g (* -1 h))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))))))))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1 (* (pow a 2) g)) (* -1/4 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1 (* (pow a 2) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* 1/4 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1 (* (pow a 2) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/8 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3))) (* 1/4 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)) (* 2 (* (pow a 2) g)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 2 (* (pow a 2) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 2 (* (pow a 2) g)) (* h (+ (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/4 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3))))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 1/2 (/ (* h (+ g (* -1 g))) g)) (* 2 g))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 2 g) (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 2 g) (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (/ (* h h) a) #s(hole binary64 (/ (pow h 2) a)))
#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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (+ (* (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)))) (* 1/12 (* (/ (* h (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2)))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (+ (* (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)))) (* h (+ (* 1/12 (* (/ (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* h (+ (* -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/6 (* (/ (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2)))))))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* 1/12 (* (/ (* (pow h 3) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (pow h 3) (+ (* -1/6 (* (/ (* h (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/12 (* (/ (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (pow h 3) (+ (* 1/12 (* (/ (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* h (+ (* -1/6 (* (/ (* h (* (cbrt 1/2) (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4)))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* -1/6 (* (/ (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* h (+ (* -1/4 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (+ g (* -1 g)) (* a g)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* h (+ (* 1/4 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/4 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/8 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* h (+ (* 1/4 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/4 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* h (+ (* -1/4 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g))) (* 1/8 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))))))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* 1/2 (/ (* h (+ g (* -1 g))) g))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* h (+ (* -1/2 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) g)) (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (pow g 3)))))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (+ g (* 1/2 (/ (* h (+ g (* -1 g))) g)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (+ g (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (+ g (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (* 1/2 (log (pow g 2)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* 1/4 (* (pow h 2) (- (* -1 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (* 2 (/ 1 (pow g 2)))))) (* 1/2 (log (pow g 2))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow g 2))) (* (pow h 2) (+ (* 1/12 (* h (+ (* 2 (/ (pow (+ g (* -1 g)) 3) (pow g 6))) (* 6 (/ (+ g (* -1 g)) (pow g 4)))))) (* 1/4 (- (* -1 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (* 2 (/ 1 (pow g 2))))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* 1/2 (log (pow g 2))) (* (pow h 2) (+ (* 1/4 (- (* -1 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (* 2 (/ 1 (pow g 2))))) (* h (+ (* 1/48 (* h (- (+ (* -24 (/ (pow (+ g (* -1 g)) 2) (pow g 6))) (* -6 (/ (pow (+ g (* -1 g)) 4) (pow g 8)))) (* 12 (/ 1 (pow g 4)))))) (* 1/12 (+ (* 2 (/ (pow (+ g (* -1 g)) 3) (pow g 6))) (* 6 (/ (+ g (* -1 g)) (pow g 4))))))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (log (pow g 2))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log (pow g 2)) (* 1/2 (* (pow h 2) (- (* -1 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (* 2 (/ 1 (pow g 2)))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log (pow g 2)) (* (pow h 2) (+ (* 1/6 (* h (+ (* 2 (/ (pow (+ g (* -1 g)) 3) (pow g 6))) (* 6 (/ (+ g (* -1 g)) (pow g 4)))))) (* 1/2 (- (* -1 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (* 2 (/ 1 (pow g 2))))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log (pow g 2)) (* (pow h 2) (+ (* 1/2 (- (* -1 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (* 2 (/ 1 (pow g 2))))) (* h (+ (* 1/24 (* h (- (+ (* -24 (/ (pow (+ g (* -1 g)) 2) (pow g 6))) (* -6 (/ (pow (+ g (* -1 g)) 4) (pow g 8)))) (* 12 (/ 1 (pow g 4)))))) (* 1/6 (+ (* 2 (/ (pow (+ g (* -1 g)) 3) (pow g 6))) (* 6 (/ (+ g (* -1 g)) (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 (* 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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* h (+ (* 1/2 (* (pow a 2) (sqrt -1))) (* 1/2 (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* h (+ (* 1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* 1/2 (* (pow a 2) (sqrt -1))) (* 1/2 (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* h (+ (* -1/8 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* 1/2 (* (pow a 2) (sqrt -1))) (* 1/2 (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (- (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))) (/ g h)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))) (/ g h)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))) (/ g h)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (+ (* -1 (/ g h)) (/ g h)) 1))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (+ (* -1 (/ g h)) (+ (/ g h) (/ (pow g 2) (pow h 2)))) 1))))
#s(approx (+ g h) #s(hole binary64 (* h (+ 1 (/ g h)))))
#s(approx (- g h) #s(hole binary64 (* h (- (/ g h) 1))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (* -1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (+ (* -1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)) (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (+ (* -1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)) (+ (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (* 1/8 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3))))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (/ g h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))) (/ g h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))) (/ g h))))))))
#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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -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 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -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 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* h (+ (* 1/2 (/ (sqrt -1) a)) (* 1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* h (+ (* 1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (+ (* 1/2 (/ (sqrt -1) a)) (* 1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* h (+ (* -1/8 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (+ (* 1/2 (/ (sqrt -1) a)) (* 1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (- (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))) (/ g h)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))) (/ g h)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))) (/ g h)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* h (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (* 1/2 (+ (log -1) (* -2 (log (/ 1 h)))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1/2 (/ (+ g (* -1 g)) h)) (* 1/2 (+ (log -1) (* -2 (log (/ 1 h))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1/2 (/ (+ g (* -1 g)) h)) (+ (* 1/4 (/ (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))) (pow h 2))) (* 1/2 (+ (log -1) (* -2 (log (/ 1 h)))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1/2 (/ (+ g (* -1 g)) h)) (+ (* 1/12 (/ (+ (* -6 (* (pow g 2) (+ g (* -1 g)))) (* -2 (pow (+ g (* -1 g)) 3))) (pow h 3))) (+ (* 1/4 (/ (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))) (pow h 2))) (* 1/2 (+ (log -1) (* -2 (log (/ 1 h))))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (* -2 (log (/ 1 h))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (+ (* -2 (log (/ 1 h))) (* -1 (/ (+ g (* -1 g)) h))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (+ (* -2 (log (/ 1 h))) (+ (* -1 (/ (+ g (* -1 g)) h)) (* 1/2 (/ (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))) (pow h 2))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (+ (* -2 (log (/ 1 h))) (+ (* -1 (/ (+ g (* -1 g)) h)) (+ (* 1/6 (/ (+ (* -6 (* (pow g 2) (+ g (* -1 g)))) (* -2 (pow (+ g (* -1 g)) 3))) (pow h 3))) (* 1/2 (/ (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))) (pow h 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 (+ (* (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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (pow h 3))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (pow h 3))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 11))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 11))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (pow h 3))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 11))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1/2 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1 (* h (+ (* -1/2 (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)) (* 1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))) (* 1/2 (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) h)) (* 1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3)))) (* 1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1)))) h)) (* 1/2 (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) h)) (* 1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))) (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1)))) h)) (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) h)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (* -1 (/ (+ g (* -1 g)) h)) 1))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (* -1 (/ (+ g (+ (* -1 g) (* -1 (/ (pow g 2) h)))) h)) 1))))
#s(approx (+ g h) #s(hole binary64 (* -1 (* h (- (* -1 (/ g h)) 1)))))
#s(approx (- g h) #s(hole binary64 (* -1 (* h (+ 1 (* -1 (/ g h)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 11))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* 1/2 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (* 1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))) (* 1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))) h)) (* -1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1))) (* -1/8 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3))))) h)) (* -1/2 (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) h)) (* -1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))) (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1)))) h)) (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) #s(hole binary64 (* -1 (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (cbrt -1/4))))))
#s(approx (cbrt (/ (/ (* h h) a) g)) #s(hole binary64 (* -1 (* (cbrt (/ (pow h 2) (* a g))) (cbrt -1)))))
#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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt -1/2))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt -1/2)))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 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) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1/2 (/ (* h (sqrt -1)) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* h (sqrt -1))))) (* 1/2 (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* h (pow (sqrt -1) 3))))) (* 1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (sqrt -1))))) h)) (* 1/2 (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) h)))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (* 1/2 (+ (log -1) (* -2 (log (/ -1 h)))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* 1/2 (+ (log -1) (* -2 (log (/ -1 h))))) (* 1/2 (/ (+ g (* -1 g)) h)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (+ g (* -1 g))) (* -1/4 (/ (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))) h))) h)) (* 1/2 (+ (log -1) (* -2 (log (/ -1 h))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (/ (+ (* -6 (* (pow g 2) (+ g (* -1 g)))) (* -2 (pow (+ g (* -1 g)) 3))) h)) (* 1/4 (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))))) h)) (* -1/2 (+ g (* -1 g)))) h)) (* 1/2 (+ (log -1) (* -2 (log (/ -1 h))))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (* -2 (log (/ -1 h))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (+ (* -2 (log (/ -1 h))) (+ (* -1 (/ g h)) (/ g h))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (+ (* -2 (log (/ -1 h))) (* -1 (/ (+ (* -1 (+ g (* -1 g))) (* -1/2 (/ (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))) h))) h))))))
#s(approx (log (* (+ g h) (- g h))) #s(hole binary64 (+ (log -1) (+ (* -2 (log (/ -1 h))) (* -1 (/ (+ (* -1 (+ g (* -1 g))) (* -1 (/ (+ (* -1/6 (/ (+ (* -6 (* (pow g 2) (+ g (* -1 g)))) (* -2 (pow (+ g (* -1 g)) 3))) h)) (* 1/2 (+ (* -2 (pow g 2)) (* -1 (pow (+ g (* -1 g)) 2))))) h))) 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 (/ (+ (* (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 a #s(hole binary64 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 (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2))) a)))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) #s(hole binary64 (* 1/2 (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1/2 (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 (* (+ g h) (- g h))) g))) (cbrt 1/2))) a)))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) #s(hole binary64 (* 1/2 (/ (- (sqrt (* (+ g h) (- g h))) g) 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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2)))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* a (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 (* (+ g h) (- g h))) 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 (neg (* (cbrt (/ g a)) 1)) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (pow (cbrt -1) 2)))))
#s(approx (* (cbrt (/ g a)) 1) #s(hole binary64 (* (cbrt (/ g a)) (pow (cbrt -1) 2))))
#s(approx (cbrt (/ g a)) #s(hole binary64 (* (cbrt (/ g a)) (pow (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)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (cbrt -1) (cbrt -1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt 1/2)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* a (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (cbrt -1) (cbrt -1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt 1/2))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (* (cbrt -1) (cbrt 1/2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (* (cbrt -1) (cbrt -1/2))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (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 (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt -1/2))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt -1/2)))))
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))))))) (neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
(neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))
(*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))
(pow.f64 (/.f64 g a) #s(literal 1/3 binary64))
(/.f64 (cbrt.f64 g) (cbrt.f64 a))
(cbrt.f64 (/.f64 g a))
(/.f64 (neg.f64 g) (neg.f64 a))
(/.f64 g a)
g
a
#s(literal 1 binary64)
(/.f64 (+.f64 (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))) #s(literal 3 binary64))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))) (-.f64 (*.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a)))) (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a)))))))
(+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
(*.f64 (cbrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))) (cbrt.f64 (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))
(pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))
(pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 2 binary64) a)))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(/.f64 (+.f64 (pow.f64 (neg.f64 g) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) #s(literal 3 binary64))) (+.f64 (*.f64 g g) (-.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) (*.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))))
(neg.f64 g)
(pow.f64 (-.f64 (*.f64 g g) (*.f64 h h)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))
(-.f64 (*.f64 g g) (*.f64 h h))
(*.f64 (fabs.f64 g) (fabs.f64 g))
(*.f64 (neg.f64 g) (neg.f64 g))
(*.f64 g g)
(pow.f64 g #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 g) #s(literal 2 binary64)))
(*.f64 (neg.f64 h) (neg.f64 h))
(*.f64 (fabs.f64 h) (fabs.f64 h))
(*.f64 h h)
(pow.f64 h #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 h) #s(literal 2 binary64)))
h
(pow.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a)) #s(literal 1/3 binary64))
(cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))
(/.f64 (neg.f64 (neg.f64 g)) (neg.f64 a))
(/.f64 (neg.f64 g) 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))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
(/.f64 (neg.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))))) (neg.f64 a))
(/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a)
(+.f64 (/.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) a) (/.f64 (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))) a))
(/.f64 (+.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) (*.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))))))
(+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))))
(*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64)))
(pow.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64)) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))
(*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))
(-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)
(*.f64 (sqrt.f64 (+.f64 g h)) (sqrt.f64 (-.f64 g h)))
(pow.f64 (exp.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (+.f64 g h) (-.f64 g h)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))
(exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64))))
(*.f64 (+.f64 g h) (-.f64 g h))
(/.f64 (+.f64 (pow.f64 g #s(literal 3 binary64)) (pow.f64 h #s(literal 3 binary64))) (+.f64 (*.f64 g g) (-.f64 (*.f64 h h) (*.f64 g h))))
(+.f64 g h)
(-.f64 g h)
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 a a)
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cbrt.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))
(*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 3 binary64)) (pow.f64 g #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) (-.f64 (*.f64 g g) (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g))))
(+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)
#s(literal -1/2 binary64)
(/.f64 (+.f64 (pow.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64))))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))) (*.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))))))
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64))))
(*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))
(cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))
(pow.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal 1/3 binary64))
(/.f64 (cbrt.f64 (/.f64 (*.f64 h h) a)) (cbrt.f64 g))
(cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g))
(/.f64 (neg.f64 (/.f64 (*.f64 h h) a)) (neg.f64 g))
(/.f64 (/.f64 (*.f64 h h) a) g)
(/.f64 (neg.f64 (*.f64 h h)) (neg.f64 a))
(/.f64 (*.f64 h h) a)
(*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))
(pow.f64 #s(literal -1/4 binary64) #s(literal 1/3 binary64))
(cbrt.f64 #s(literal -1/4 binary64))
#s(literal -1/4 binary64)
(*.f64 (cbrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))) (cbrt.f64 (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))
(pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.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))))
(/.f64 (+.f64 (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))) (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))))))
(+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))))
(*.f64 (cbrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))) (cbrt.f64 (+.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))))
(pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 g) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 3 binary64))) (+.f64 (*.f64 g g) (-.f64 (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) (*.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))
(+.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))
(*.f64 (sqrt.f64 (+.f64 g h)) (sqrt.f64 (-.f64 g h)))
(pow.f64 (exp.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (+.f64 g h) (-.f64 g h)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))
(exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64))))
(*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64))
(+.f64 (log.f64 (+.f64 g h)) (log.f64 (-.f64 g h)))
(log.f64 (*.f64 (+.f64 g h) (-.f64 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))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))))) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))) (*.f64 #s(literal -1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (neg (* (cbrt (/ g a)) 1)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (/.f64 g a))))
#s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))
#s(approx (cbrt (/ g a)) (cbrt.f64 (/.f64 g a)))
#s(approx (/ g a) (/.f64 g a))
#s(approx g g)
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))) (*.f64 #s(literal -1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 g (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (-.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 g g) (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (+.f64 (*.f64 #s(literal -1 binary64) g) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (+.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 g (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (+.f64 (*.f64 g (-.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 g g) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (neg g) (*.f64 #s(literal -1 binary64) g))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 g g) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 g g) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)))))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 g g) (+.f64 (*.f64 (*.f64 g g) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 g g) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)))))))
#s(approx (- (* g g) (* h h)) (*.f64 #s(literal -1 binary64) (*.f64 h h)))
#s(approx (- (* g g) (* h h)) (-.f64 (*.f64 g g) (*.f64 h h)))
#s(approx (* g g) (*.f64 g g))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 g (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (-.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 g g) (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (neg g) a) (*.f64 #s(literal -1 binary64) (/.f64 g a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))) a))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))))))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))) (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))))))))))) (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))))))))))))))))) (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (*.f64 g (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 (*.f64 a a) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (*.f64 g (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 g (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (+ g h) (- g h)) (*.f64 #s(literal -1 binary64) (*.f64 h h)))
#s(approx (* (+ g h) (- g h)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h)))))
#s(approx (* (+ g h) (- g h)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 g (+.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h))))))
#s(approx (+ g h) h)
#s(approx (+ g h) (+.f64 g h))
#s(approx (- g h) (*.f64 #s(literal -1 binary64) h))
#s(approx (- g h) (-.f64 g h))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (*.f64 g (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 (*.f64 a a) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (*.f64 g (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 g (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))))
#s(approx (cbrt (/ (/ (* h h) a) g)) (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))))
#s(approx (/ (/ (* h h) a) g) (/.f64 (*.f64 h h) (*.f64 a g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 #s(literal -1 binary64) g) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 g (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 g (-.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 g g) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -1 binary64)) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -1 binary64)) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -1 binary64)) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -1 binary64)) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -2 binary64)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -1 binary64)) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -1 binary64)) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 g a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 g a) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (+.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (+.f64 (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (+.f64 (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (log.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) #s(literal 1/2 binary64))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 h h))) (log.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) #s(literal 1/2 binary64)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (log.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) #s(literal 1/2 binary64))) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h h))) (*.f64 #s(literal 1/4 binary64) (*.f64 g (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (pow.f64 h #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 h #s(literal -2 binary64))))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (log.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) #s(literal 1/2 binary64))) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h h))) (*.f64 g (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -6 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (pow.f64 h #s(literal 4 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 3 binary64)) (pow.f64 h #s(literal 6 binary64))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (pow.f64 h #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 h #s(literal -2 binary64)))))))))))
#s(approx (log (* (+ g h) (- g h))) (log.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 h h)))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h h))) (*.f64 #s(literal 1/2 binary64) (*.f64 g (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (pow.f64 h #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 h #s(literal -2 binary64))))))))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h h))) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -6 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (pow.f64 h #s(literal 4 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 3 binary64)) (pow.f64 h #s(literal 6 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (pow.f64 h #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 h #s(literal -2 binary64)))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (cbrt.f64 #s(literal -1/4 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 10 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (cbrt.f64 #s(literal -1/4 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 10 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 16 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (cbrt.f64 #s(literal -1/4 binary64))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 13 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 13 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/576 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 13 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 5 binary64))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) a)) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g))))) g))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) a)) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))))) g))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 h #s(literal 8 binary64))) (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 8 binary64)))) (*.f64 a (pow.f64 g #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) a)) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64)))))))) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g)))) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 4 binary64)))))) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 h #s(literal 8 binary64))) (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 8 binary64)))) (pow.f64 g #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 4 binary64))))))) g))
#s(approx (sqrt (- (* g g) (* h h))) g)
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 6 binary64)))))))))
#s(approx (- (* g g) (* h h)) (*.f64 g g))
#s(approx (- (* g g) (* h h)) (*.f64 (*.f64 g g) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h h) (*.f64 g g))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 20 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 g g) a) (/.f64 (pow.f64 h #s(literal 4 binary64)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 g a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 g (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g))))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g)) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (cbrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g)) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (cbrt.f64 #s(literal -1 binary64)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 5 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g)) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (cbrt.f64 #s(literal -1 binary64)))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g)))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) g)
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g))))))))
#s(approx (* (+ g h) (- g h)) (*.f64 g g))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 g g) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) (/.f64 h g)))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 g g) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (/.f64 h g))))))
#s(approx (+ g h) g)
#s(approx (+ g h) (*.f64 g (+.f64 #s(literal 1 binary64) (/.f64 h g))))
#s(approx (- g h) g)
#s(approx (- g h) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 h g)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 5 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (cbrt.f64 #s(literal -1 binary64))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 5 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 8 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (cbrt.f64 #s(literal -1 binary64)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 g (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 11 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 5 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 8 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (cbrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) g)))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a a)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a a)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a a)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (pow.f64 g #s(literal 3 binary64)))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) g)))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (*.f64 #s(literal 2 binary64) (*.f64 a a)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (*.f64 #s(literal 2 binary64) (*.f64 a a))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (*.f64 #s(literal 2 binary64) (*.f64 a a)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal 2 binary64) g))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 g (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 g (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 g (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g))))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -2 binary64) g))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) #s(literal 2 binary64))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 g (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g)))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 g (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 6 binary64)))) (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) a)) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 a g)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 a g))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 a (pow.f64 g #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 a g)))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) g)
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 g))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 g))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 g))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 h h)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 g))) (+.f64 (*.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 3 binary64))) (*.f64 #s(literal 6 binary64) (*.f64 (*.f64 h h) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 h h)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g))))))
#s(approx (log (* (+ g h) (- g h))) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 g))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 g))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) (/.f64 h g))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 g))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 h h)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g))) (/.f64 h g)))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 g))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 3 binary64))) (*.f64 #s(literal 6 binary64) (*.f64 (*.f64 h h) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 h h)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g))) (/.f64 h 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a)) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) g)) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a)) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) g)) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (neg (* (cbrt (/ g a)) 1)) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (* (cbrt (/ g a)) 1) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (cbrt (/ g a)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 20 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 g g) a) (/.f64 (pow.f64 h #s(literal 4 binary64)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 g a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 6 binary64))))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -2 binary64) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 6 binary64))))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) g))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g)))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 6 binary64))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/576 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (/.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) a))) g)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) a)))) g)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 h #s(literal 8 binary64))) (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 8 binary64)))) (*.f64 a (pow.f64 g #s(literal 6 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) a))))) g)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 g #s(literal 0 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) g) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) g) #s(literal 0 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (*.f64 g #s(literal 0 binary64)))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) #s(literal 0 binary64)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) g)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) g)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) #s(literal 0 binary64)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) g)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) g)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) #s(literal 0 binary64)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 g #s(literal 0 binary64)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (*.f64 (*.f64 a a) #s(literal 0 binary64))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) g)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) g)) (*.f64 (*.f64 a a) #s(literal 0 binary64))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) g)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) g)) (*.f64 (*.f64 a a) #s(literal 0 binary64))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g #s(literal 0 binary64))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) #s(literal -1 binary64))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g #s(literal -1 binary64))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) #s(literal -1 binary64)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64)))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 g g) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (/.f64 (*.f64 h h) g)) g)))))
#s(approx (+ g h) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) #s(literal 1 binary64)))))
#s(approx (- g h) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (/.f64 h g) #s(literal 1 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 g #s(literal -2 binary64))) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) g) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) g) #s(literal 4 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 g #s(literal -2 binary64)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) g))) g)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) #s(literal -2 binary64)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 g #s(literal -1 binary64))))) g)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) g)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) #s(literal -2 binary64)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 g #s(literal -2 binary64)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) g)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) g)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) g)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) g)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g #s(literal -2 binary64))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1/4 binary64)))))
#s(approx (cbrt (/ (/ (* h h) a) g)) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g))) (*.f64 #s(literal -1/2 binary64) (*.f64 h h))) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g))))) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 h #s(literal 8 binary64))) (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 8 binary64)))) (pow.f64 g #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 4 binary64))))))) g)))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) g)) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a)) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) g)) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a)) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a)) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) g)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a)) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 #s(literal -1 binary64) (/.f64 g a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a g))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 a g)))) g)) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 a g))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) a))) g)) (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a))) g)) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 #s(literal -2 binary64) g))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g))) g))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) g)) (*.f64 #s(literal -1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) g))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g))) g))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) g)) (*.f64 #s(literal -1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -1 binary64))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 h h)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g))) g))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 (*.f64 #s(literal -6 binary64) (*.f64 (*.f64 h h) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal -2 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 3 binary64)))) g)) (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 h h)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) g)) (*.f64 #s(literal -1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g))))
#s(approx (log (* (+ g h) (- g h))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -2 binary64))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -2 binary64))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) (/.f64 h g))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 h h)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g))) g))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (+.f64 (*.f64 #s(literal -6 binary64) (*.f64 (*.f64 h h) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal -2 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 3 binary64)))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 h h)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) g))) 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))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 13 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/216 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 6 binary64)))) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64)))) (*.f64 (*.f64 g g) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))) (*.f64 (pow.f64 h #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 13 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))) (*.f64 (pow.f64 h #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (pow.f64 (*.f64 g h) #s(literal 2 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/192 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) (*.f64 (*.f64 h h) #s(literal -1/2 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 5/128 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 7 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 13 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 5 binary64))))) (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -5/256 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (*.f64 #s(literal 1/32 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -5/128 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 7 binary64)))) (*.f64 #s(literal 1/16 binary64) (pow.f64 g #s(literal -5 binary64))))) (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64)))))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64)))))))
#s(approx (- (* g g) (* h h)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 g g)))
#s(approx (* h h) (*.f64 h h))
#s(approx h h)
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (*.f64 h h) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (*.f64 h h) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/216 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 6 binary64)))) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64)))) (*.f64 (*.f64 g g) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g a)) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g a)) (*.f64 (*.f64 h h) (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 5 binary64))))) (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))) a))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 g g)))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (pow.f64 g #s(literal 11 binary64)))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 g #s(literal 14 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 g g)))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (pow.f64 g #s(literal 11 binary64)))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 g #s(literal 14 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))))) g) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64)))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) (*.f64 g g))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 4 binary64)))))))) g) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))))) g) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64)))))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g)))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64)))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g)))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64)))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) g))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (+.f64 g (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (+.f64 g (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64))))))))))
#s(approx (* (+ g h) (- g h)) (+.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) (*.f64 g g)))
#s(approx (* (+ g h) (- g h)) (+.f64 (*.f64 h (+.f64 g (+.f64 (*.f64 #s(literal -1 binary64) g) (*.f64 #s(literal -1 binary64) h)))) (*.f64 g g)))
#s(approx (- g h) (+.f64 g (*.f64 #s(literal -1 binary64) h)))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 g g)))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 g g)))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (pow.f64 g #s(literal 11 binary64)))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 g #s(literal 14 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) g)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) g))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) g)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 #s(literal 2 binary64) g)))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal 2 binary64) g) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal 2 binary64) g) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64))))))))))
#s(approx (/ (* h h) a) (/.f64 (*.f64 h h) a))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h h) g)) (*.f64 #s(literal 2 binary64) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) g)))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 h a) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) a) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (/.f64 h a) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64)))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (/.f64 h a) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) (*.f64 g g))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 4 binary64)))))) g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64)))))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g))) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 h a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64))))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g))) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64))))))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) g))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (+.f64 g (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (+.f64 g (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64))))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (log.f64 (pow.f64 (*.f64 g g) #s(literal 1/2 binary64))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 g #s(literal -2 binary64)))))) (log.f64 (pow.f64 (*.f64 g g) #s(literal 1/2 binary64)))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (log.f64 (pow.f64 (*.f64 g g) #s(literal 1/2 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 h (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 g #s(literal 6 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 4 binary64))))))) (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 g #s(literal -2 binary64)))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (log.f64 (pow.f64 (*.f64 g g) #s(literal 1/2 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 g #s(literal -2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 h (-.f64 (+.f64 (*.f64 #s(literal -24 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (pow.f64 g #s(literal 6 binary64)))) (*.f64 #s(literal -6 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 4 binary64)) (pow.f64 g #s(literal 8 binary64))))) (*.f64 #s(literal 12 binary64) (pow.f64 g #s(literal -4 binary64)))))) (*.f64 #s(literal 1/12 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 g #s(literal 6 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 4 binary64))))))))))))
#s(approx (log (* (+ g h) (- g h))) (*.f64 #s(literal 2 binary64) (log.f64 g)))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (*.f64 #s(literal 2 binary64) (log.f64 g)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 g #s(literal -2 binary64))))))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (*.f64 #s(literal 2 binary64) (log.f64 g)) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 h (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 g #s(literal 6 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 g #s(literal -2 binary64)))))))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (*.f64 #s(literal 2 binary64) (log.f64 g)) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (pow.f64 g #s(literal -2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 h (-.f64 (+.f64 (*.f64 #s(literal -24 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (pow.f64 g #s(literal 6 binary64)))) (*.f64 #s(literal -6 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 4 binary64)) (pow.f64 g #s(literal 8 binary64))))) (*.f64 #s(literal 12 binary64) (pow.f64 g #s(literal -4 binary64)))))) (*.f64 #s(literal 1/6 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 g #s(literal 6 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 4 binary64))))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 g h)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 g h))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 g h))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 g #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (- (* g g) (* h h)) (*.f64 (*.f64 h h) (-.f64 (/.f64 (*.f64 g g) (*.f64 h h)) #s(literal 1 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))) a))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)) h)))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)) h))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 h (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)) h)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)) h))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)) h)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)) h))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 g h))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 g h))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 g h))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 h h) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g h)) (/.f64 g h)) #s(literal 1 binary64))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 h h) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g h)) (+.f64 (/.f64 g h) (/.f64 (*.f64 g g) (*.f64 h h)))) #s(literal 1 binary64))))
#s(approx (+ g h) (*.f64 h (+.f64 #s(literal 1 binary64) (/.f64 g h))))
#s(approx (- g h) (*.f64 h (-.f64 (/.f64 g h) #s(literal 1 binary64))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h)) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g h)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g h)))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 g h)) (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 g h)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g h))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) h)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) h))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 h (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) h)))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 g h))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 g h))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 g h))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 h))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) h)) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 h)))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) h)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 g g)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))) (*.f64 h h))) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 h))))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) h)) (+.f64 (*.f64 #s(literal 1/12 binary64) (/.f64 (+.f64 (*.f64 #s(literal -6 binary64) (*.f64 (*.f64 g g) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (*.f64 #s(literal -2 binary64) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 g g)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))) (*.f64 h h))) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 h)))))))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 h)))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 h))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) h)))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 h))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 g g)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))) (*.f64 h h)))))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (neg.f64 (log.f64 h))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) h)) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (+.f64 (*.f64 #s(literal -6 binary64) (*.f64 (*.f64 g g) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (*.f64 #s(literal -2 binary64) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)))) (pow.f64 h #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 g g)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))) (*.f64 h 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) h)) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))))))))) h)) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))))))) h)) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 g (*.f64 a h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g a)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (*.f64 (*.f64 h h) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 g a))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 g h)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 g g) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) g) h))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (*.f64 h h) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (sqrt.f64 #s(literal -1 binary64))))) h)) g) h))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 g #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 g (*.f64 a h)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (*.f64 (*.f64 h h) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 g a))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64)))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) h) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) h) (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64)))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)) h)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) h)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) h)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)) h)) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))) h)) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))) h)) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) h))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) g) h))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) g) h))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) h))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) h))))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) h)) #s(literal 1 binary64))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (+.f64 (*.f64 #s(literal -1 binary64) g) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 g g) h)))) h)) #s(literal 1 binary64))))
#s(approx (+ g h) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 g h)) #s(literal 1 binary64)))))
#s(approx (- g h) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 g h))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) h) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) h) (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) h)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) h)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h)) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h))))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (cbrt.f64 #s(literal 1/4 binary64)))))
#s(approx (cbrt (/ (/ (* h h) a) g)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1 binary64)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (/.f64 g h) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) g) h)) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (*.f64 h h) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (sqrt.f64 #s(literal -1 binary64))))) h)) g) h)) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64)))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))) h)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) h))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) g) h))))))
#s(approx (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) g) h))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) h))))))
#s(approx (exp (* (log (* (+ g h) (- g h))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) h))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -2 binary64))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) h))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 g g)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))) h))) h)) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -2 binary64)))))))
#s(approx (* (log (* (+ g h) (- g h))) 1/2) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (+.f64 (*.f64 #s(literal -6 binary64) (*.f64 (*.f64 g g) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (*.f64 #s(literal -2 binary64) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)))) h)) (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 g g)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))) h)) (*.f64 #s(literal -1/2 binary64) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) h)) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -2 binary64)))))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -2 binary64)))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 #s(literal -1 binary64)) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -2 binary64))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g h)) (/.f64 g h)))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 #s(literal -1 binary64)) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 g g)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))) h))) h)))))
#s(approx (log (* (+ g h) (- g h))) (+.f64 (log.f64 #s(literal -1 binary64)) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (+.f64 (*.f64 #s(literal -6 binary64) (*.f64 (*.f64 g g) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (*.f64 #s(literal -2 binary64) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)))) h)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 g g)) (*.f64 #s(literal -1 binary64) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))) h))) 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))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g)) #s(literal 1/2 binary64)))) a))
#s(approx a a)
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a)))
#s(approx (/ 1 (* 2 a)) (/.f64 #s(literal 1/2 binary64) a))
#s(approx (* 2 a) (*.f64 #s(literal 2 binary64) a))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal 1/2 binary64)))) a))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal 1/2 binary64))))
#s(approx (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)))
#s(approx (* a a) (*.f64 a a))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal -1/2 binary64))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal 1/2 binary64)))) a))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) 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))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 a (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (neg (* (cbrt (/ g a)) 1)) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))
#s(approx (* (cbrt (/ g a)) 1) (*.f64 (cbrt.f64 (/.f64 g a)) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
#s(approx (cbrt (/ g a)) (*.f64 (cbrt.f64 (/.f64 g a)) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a) #s(literal 1/2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64))))))
#s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g))) (cbrt.f64 #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))) (cbrt.f64 #s(literal 1/2 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (exp (* (log (* (+ g h) (- g h))) 1/2))))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64))))

eval173.0ms (2%)

Memory
17.9MiB live, 245.2MiB allocated; 28ms collecting garbage
Compiler

Compiled 101 923 to 7 964 computations (92.2% saved)

prune62.0ms (0.7%)

Memory
11.1MiB live, 108.2MiB allocated; 11ms collecting garbage
Pruning

24 alts after pruning (24 fresh and 0 done)

PrunedKeptTotal
New1 094151 109
Fresh4913
Picked505
Done000
Total1 103241 127
Accuracy
97.6%
Counts
1 127 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.5%
(+.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))) #s(literal 1/3 binary64)) (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)))))))
43.6%
(+.f64 (*.f64 (cbrt.f64 (/.f64 #s(literal 1/2 binary64) a)) (cbrt.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) (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)))))))
27.1%
(+.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (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)))))))
45.3%
(+.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)))))) (*.f64 (cbrt.f64 (/.f64 #s(literal 1/2 binary64) a)) (cbrt.f64 (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))
10.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 (pow.f64 (*.f64 g g) #s(literal 3 binary64)) (pow.f64 (*.f64 h h) #s(literal 3 binary64))) (+.f64 (pow.f64 g #s(literal 4 binary64)) (+.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (*.f64 g h) #s(literal 2 binary64))))))))))
19.1%
(+.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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))))
21.7%
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) g))))))
66.9%
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
23.4%
(+.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))) (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)))))))
63.2%
(+.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
66.8%
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))))
18.8%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 (+.f64 (*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
11.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))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 #s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g)))) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
32.8%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 #s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))) a))
40.6%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 #s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 a (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))) a))
17.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))))))) (/.f64 #s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))))) a))
40.6%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
32.3%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 (+.f64 (*.f64 (cbrt.f64 #s(literal -1/4 binary64)) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) (pow.f64 g #s(literal 4 binary64))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))))) g))
30.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))))))) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (cbrt.f64 #s(literal -1/4 binary64))))))
36.5%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (pow.f64 (/.f64 g a) #s(literal 1/3 binary64)) #s(literal 1 binary64))))
95.9%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64))))
72.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))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))))
35.7%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g))))))
40.5%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
Compiler

Compiled 3 058 to 1 756 computations (42.6% saved)

series238.0ms (2.7%)

Memory
-7.2MiB live, 416.6MiB allocated; 78ms collecting garbage
Counts
65 → 743
Calls
Call 1
Inputs
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64))))
(neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64)))
(*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64))
(/.f64 (cbrt.f64 g) (cbrt.f64 a))
(cbrt.f64 g)
g
(cbrt.f64 a)
a
#s(literal 1 binary64)
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))))
(neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a))))
#s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))
(cbrt.f64 (/.f64 g a))
(/.f64 g a)
(+.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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))))
(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))
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))
(neg.f64 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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a))
(*.f64 #s(literal -1/4 binary64) (*.f64 h h))
#s(literal -1/4 binary64)
(*.f64 g 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))))))) (/.f64 (+.f64 (*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
(/.f64 (+.f64 (*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a)
(+.f64 (*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))))
(*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64)))
(cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)))
(*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))
(-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)
(sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))
(*.f64 (+.f64 g h) (-.f64 g h))
(+.f64 g h)
(-.f64 g h)
(*.f64 a a)
(cbrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))
(*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))
(+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)
#s(literal -1/2 binary64)
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64))))))
(*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))
#s(literal -1 binary64)
(+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64))))
(*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64)))
(cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a))
(/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)
(+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))
(*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))
(cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a))
(/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)
(cbrt.f64 #s(literal -1/2 binary64))
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 (neg (* (/ (cbrt g) (cbrt a)) 1)) #s(hole binary64 (* -1 (cbrt (/ g a)))))
#s(approx (* (/ (cbrt g) (cbrt a)) 1) #s(hole binary64 (cbrt (/ g a))))
#s(approx (/ (cbrt g) (cbrt a)) #s(hole binary64 (cbrt (/ g a))))
#s(approx (cbrt g) #s(hole binary64 (cbrt g)))
#s(approx g #s(hole binary64 g))
#s(approx (neg (* (cbrt (/ g a)) 1)) #s(hole binary64 (* -1 (cbrt (/ g a)))))
#s(approx (* (cbrt (/ g a)) 1) #s(hole binary64 (cbrt (/ g a))))
#s(approx (cbrt (/ g a)) #s(hole binary64 (cbrt (/ g a))))
#s(approx (/ g a) #s(hole binary64 (/ g a)))
#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 (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 (/ (* -1/4 (* h h)) (* g a)) #s(hole binary64 (* -1/4 (/ (pow h 2) (* a g)))))
#s(approx (* g a) #s(hole binary64 (* a g)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))) a)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))) (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))))))))))) (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (cbrt (* (pow a 2) (* h (sqrt -1))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (cbrt (* (pow a 2) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (cbrt (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (cbrt (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (* h (sqrt -1)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* (pow a 2) (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))) (* (pow a 2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* g (+ (* -1/4 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))))) (* (pow a 2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (sqrt -1))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)) (* h (sqrt -1)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 1)) (* h (sqrt -1)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))) 1)) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* 1/2 (/ (* g (+ h (* -1 h))) (* h (sqrt -1)))) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))))))) (* h (sqrt -1)))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* -1 (pow h 2))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* -1 (pow h 2)) (* g (+ h (* -1 h))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* -1 (pow h 2)) (* g (+ g (+ h (* -1 h)))))))
#s(approx (+ g h) #s(hole binary64 h))
#s(approx (+ g h) #s(hole binary64 (+ g h)))
#s(approx (- g h) #s(hole binary64 (* -1 h)))
#s(approx (- g h) #s(hole binary64 (- g h)))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1/2 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* -1/2 (* (pow a 2) (* h (sqrt -1)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* -1/2 (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* -1/4 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* -1/2 (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* g (+ (* -1/4 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/8 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (* h (sqrt -1)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* (pow a 2) (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))) (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* g (+ (* -1/4 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))))) (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (sqrt -1))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (+ 1 (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))))) (* h (sqrt -1)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))))) (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))) (* g (+ (* -1 (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))) (* -1 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))) (* g (+ (* -1 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (* g (+ (* -1 (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))))) (* -1 (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt 1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (cbrt (/ (* h (sqrt -1)) a))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (+ (cbrt (/ (* h (sqrt -1)) a)) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (+ (cbrt (/ (* h (sqrt -1)) a)) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (+ (cbrt (/ (* h (sqrt -1)) a)) (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (/ (* h (sqrt -1)) a)))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (/ (* h (sqrt -1)) a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* h (sqrt -1))))) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (/ (* h (sqrt -1)) a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (+ (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))))) (/ 1 a)))) (/ (* h (sqrt -1)) a))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (+ (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (+ (* g (+ 1 (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* h (sqrt -1)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (+ (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))))) (* h (sqrt -1)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (cbrt (/ (* h (sqrt -1)) a))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (cbrt (/ (* h (sqrt -1)) a)) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (cbrt (/ (* h (sqrt -1)) a)) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (cbrt (/ (* h (sqrt -1)) a)) (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (/ (* h (sqrt -1)) a)))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (+ (* g (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (/ (* h (sqrt -1)) a))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* h (sqrt -1))))) (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1)))))) (/ 1 a))) (/ (* h (sqrt -1)) a))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1)))))))) (/ 1 a))) (/ (* h (sqrt -1)) 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 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 (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* g (+ (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (/ (pow (cbrt 1/2) 2) g)) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (/ (pow (cbrt 1/2) 2) g)) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (/ (pow (cbrt 1/2) 2) g)) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2))))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (cbrt 1/2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/2 (* (pow a 2) (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow (+ h (* -1 h)) 2))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow (+ h (* -1 h)) 5)) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))))))))) (* (pow g 3) (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (cbrt 1/2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (cbrt 1/2))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (cbrt 1/2)))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (pow (cbrt 1/2) 2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (cbrt 1/2))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/2 (* (pow a 2) (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow (+ h (* -1 h)) 2))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow (+ h (* -1 h)) 5)) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))))))))) (* (pow g 3) (pow (cbrt 1/2) 2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (pow (cbrt 1/2) 2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (cbrt 1/2)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* 1/2 (* (pow a 2) (+ h (* -1 h))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (+ h (* -1 h)))) (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 2))) (+ (* 1/2 (* (pow a 2) (+ h (* -1 h)))) (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a 2) (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))) (pow g 3))) (+ (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 2))) (+ (* 1/2 (* (pow a 2) (+ h (* -1 h)))) (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* 1/2 (+ h (* -1 h)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (pow g 3))) (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 g))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (pow g 2)))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (+ (* -1 (/ h g)) (/ h g))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (+ (* -1 (/ h g)) (+ (* -1 (/ (pow h 2) (pow g 2))) (/ h g)))))))
#s(approx (+ g h) #s(hole binary64 g))
#s(approx (+ g h) #s(hole binary64 (* g (+ 1 (/ h g)))))
#s(approx (- g h) #s(hole binary64 g))
#s(approx (- g h) #s(hole binary64 (* g (+ 1 (* -1 (/ h g))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 8))) (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2))))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* g (+ (* -1/12 (* (cbrt (/ (pow a 2) (pow g 11))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 8))) (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* (pow a 2) g))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* g (+ (* -1 (pow a 2)) (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* g (+ (* -1 (pow a 2)) (+ (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* -1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* g (+ (* -1 (pow a 2)) (+ (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)) (+ (* -1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (* 1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 3)))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* 2 (* (pow a 2) g))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* g (+ (* 1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* 2 (pow a 2))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* g (+ (* 1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (+ (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (* 2 (pow a 2)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* g (+ (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 3))) (+ (* 1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (+ (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (* 2 (pow a 2))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* 2 g)))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* g (+ 2 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* g (+ 2 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* g (+ 2 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* -1 (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))) (* -1 (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* -1 (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))) (+ (* -1 (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* -1 (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))) (+ (* -1 (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g))) (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))))) (pow (cbrt 1/2) 2))))) (pow g 3))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/2) 2))))))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* g (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))))) (* (pow g 3) (pow (cbrt 1/2) 2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g)))))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (* (cbrt 1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* g (+ (* -1/12 (* (cbrt (/ 1 (* a (pow g 11)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (* (cbrt 1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* (cbrt (/ g a)) (cbrt 2))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (+ h (* -1 h)) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (cbrt 2))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (+ h (* -1 h)) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (cbrt 2)))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* g (+ (* -1/12 (* (cbrt (/ 1 (* a (pow g 11)))) (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (+ h (* -1 h)) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (cbrt 2))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* 2 (/ g a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* a g))) (* 2 (/ 1 a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* a g))) (+ (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a (pow g 2)))) (* 2 (/ 1 a)))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* g (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 3)))) (+ (* 1/2 (/ (+ h (* -1 h)) (* a g))) (+ (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a (pow g 2)))) (* 2 (/ 1 a))))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* 2 g)))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* g (+ 2 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* g (+ 2 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* g (+ 2 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* (cbrt (/ (+ h (* -1 h)) a)) (* (cbrt -1/2) (cbrt 1/2)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (* (cbrt (/ (+ h (* -1 h)) a)) (* (cbrt -1/2) (cbrt 1/2))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))))) (* (pow g 2) (pow (cbrt 1/2) 2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (* (cbrt -1/2) (cbrt 1/2)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) a)) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 5))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))))))))))) (* (pow g 3) (pow (cbrt 1/2) 2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))))) (* (pow g 2) (pow (cbrt 1/2) 2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (* (cbrt -1/2) (cbrt 1/2))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/2))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/2)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (pow (cbrt 1/2) 2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/2))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) a)) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 5))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))))))))) (* (pow g 3) (pow (cbrt 1/2) 2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (pow (cbrt 1/2) 2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/2)))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* 1/2 (/ (+ h (* -1 h)) a))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (+ (* 1/2 (/ (+ h (* -1 h)) a)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 2)))) (+ (* 1/2 (/ (+ h (* -1 h)) a)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g)))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (* a (pow g 3)))) (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 2)))) (+ (* 1/2 (/ (+ h (* -1 h)) a)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a 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 (* -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 (neg (* (/ (cbrt g) (cbrt a)) 1)) #s(hole binary64 (* (cbrt (/ g a)) (cbrt -1))))
#s(approx (* (/ (cbrt g) (cbrt a)) 1) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#s(approx (/ (cbrt g) (cbrt a)) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#s(approx (cbrt g) #s(hole binary64 (* -1 (* (cbrt g) (cbrt -1)))))
#s(approx (neg (* (cbrt (/ g a)) 1)) #s(hole binary64 (* (cbrt (/ g a)) (cbrt -1))))
#s(approx (* (cbrt (/ g a)) 1) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#s(approx (cbrt (/ g a)) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#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 (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* g (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))) a))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* g (+ 1 (pow (sqrt -1) 2))))) (cbrt 1/2)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ (pow a 2) (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) g) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) g) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (cbrt (* (pow a 2) (* g (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (* -1/6 (* (cbrt (/ (pow a 2) (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (+ h (* -1 h)))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) g) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (+ h (* -1 h))))) (pow g 3))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) g) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (+ h (* -1 h))))) (pow g 3))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* g (+ 1 (pow (sqrt -1) 2)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* (pow a 2) (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (pow (sqrt -1) 2))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (pow (sqrt -1) 2)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (* -1 (/ (+ (* -1 (+ h (* -1 h))) (/ (pow h 2) g)) g))))))
#s(approx (+ g h) #s(hole binary64 (* -1 (* g (- (* -1 (/ h g)) 1)))))
#s(approx (- g h) #s(hole binary64 (* -1 (* g (- (/ h g) 1)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* g (- (pow (sqrt -1) 2) 1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ (pow a 2) (* (pow g 5) (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) g) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) g) (pow (- (pow (sqrt -1) 2) 1) 2))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* 1/2 (* (pow a 2) (* g (- (pow (sqrt -1) 2) 1))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* g (+ (* -1/2 (* (pow a 2) (- (pow (sqrt -1) 2) 1))) (* 1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/4 (* (pow a 2) (+ h (* -1 h)))) (* 1/4 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g))) g)) (* -1/2 (* (pow a 2) (- (pow (sqrt -1) 2) 1))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* -1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2))))) g)) (* -1/4 (* (pow a 2) (+ h (* -1 h))))) g)) (* -1/2 (* (pow a 2) (- (pow (sqrt -1) 2) 1))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* g (- (pow (sqrt -1) 2) 1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* (pow a 2) (- (pow (sqrt -1) 2) 1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (- (pow (sqrt -1) 2) 1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (- (pow (sqrt -1) 2) 1)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (pow (sqrt -1) 2) 1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* g (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))) a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (- (pow (sqrt -1) 2) 1) 2))))) (* (cbrt 1/2) (+ h (* -1 h)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))))) (+ (* 1/6 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) (pow g 3))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) (+ (* -1/12 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))))) g))) (pow g 3))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* g (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2))))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* (cbrt (/ (* g (- (pow (sqrt -1) 2) 1)) a)) (cbrt 1/2)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (- (pow (sqrt -1) 2) 1) 2))))) (* (cbrt 1/2) (+ h (* -1 h))))) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (cbrt (/ (* g (- (pow (sqrt -1) 2) 1)) a)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (* -1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (- (pow (sqrt -1) 2) 1) 2))))) (+ h (* -1 h)))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (* -1 (/ (+ (* -1/6 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (+ h (* -1 h))))) (pow g 3))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (+ h (* -1 h))))) (pow g 3))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (/ (* g (- (pow (sqrt -1) 2) 1)) a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (* g (- (+ (* -1/2 (/ (+ h (* -1 h)) (* a g))) (/ (pow (sqrt -1) 2) a)) (/ 1 a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) (* a g))) (* 1/2 (/ (+ h (* -1 h)) a))) g)) (/ (pow (sqrt -1) 2) a)) (/ 1 a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* a (* g (pow (sqrt -1) 2))))) (* 1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) a))) g)) (* 1/2 (/ (+ h (* -1 h)) a))) g)) (/ (pow (sqrt -1) 2) a)) (/ 1 a))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* g (- (pow (sqrt -1) 2) 1)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* g (- (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* (cbrt (/ (* g (+ 1 (pow (sqrt -1) 2))) a)) (cbrt -1/2)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (* (cbrt -1/2) (+ h (* -1 h))))) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (cbrt (/ (* g (+ 1 (pow (sqrt -1) 2))) a)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (* -1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (+ h (* -1 h)))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (* -1 (/ (+ (* -1/6 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (+ h (* -1 h))))) (pow g 3))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (+ h (* -1 h))))) (pow g 3))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (/ (* g (+ 1 (pow (sqrt -1) 2))) a))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (+ h (* -1 h)) (* a g))) (+ (/ 1 a) (/ (pow (sqrt -1) 2) a)))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) (* a g))) (* 1/2 (/ (+ h (* -1 h)) a))) g)) (+ (/ 1 a) (/ (pow (sqrt -1) 2) a)))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* a (* g (pow (sqrt -1) 2))))) (* 1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) a))) g)) (* 1/2 (/ (+ h (* -1 h)) a))) g)) (+ (/ 1 a) (/ (pow (sqrt -1) 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 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 (* -1/4 (* h h)) #s(hole binary64 (* -1/4 (pow h 2))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))) a)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* a (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* (pow a 2) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* 1/12 (* (/ (* (pow a 2) (* (pow h 3) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (pow h 3) (+ (* -1/6 (* (/ (* (pow a 2) (* h (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/12 (* (/ (* (pow a 2) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (pow h 3) (+ (* 1/12 (* (/ (* (pow a 2) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* h (+ (* -1/6 (* (/ (* (pow a 2) (* h (* (cbrt 1/2) (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4))))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* -1/6 (* (/ (* (pow a 2) (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))) (* 1/12 (* (/ (* (pow a 2) (* (pow h 3) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))) (* (pow h 3) (+ (* -1/6 (* (/ (* (pow a 2) (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/12 (* (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))) (* (pow h 3) (+ (* 1/12 (* (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* h (+ (* -1/6 (* (/ (* (pow a 2) (* h (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4)))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* -1/6 (* (/ (* (pow a 2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/4 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) g)) (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* 1/2 (/ (* h (+ g (* -1 g))) g))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* h (+ (* -1/2 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) g)) (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (pow g 3)))))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* 1/2 (/ (* h (+ g (* -1 g))) g)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* h (+ g (* -1 g))) (pow g 2))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* h (+ g (+ (* -1 g) (* -1 h)))) (pow g 2))))
#s(approx (- g h) #s(hole binary64 (+ g (* -1 h))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))))))))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1 (* (pow a 2) g)) (* -1/4 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1 (* (pow a 2) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* 1/4 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1 (* (pow a 2) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/8 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3))) (* 1/4 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)) (* 2 (* (pow a 2) g)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 2 (* (pow a 2) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 2 (* (pow a 2) g)) (* h (+ (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/4 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3))))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 1/2 (/ (* h (+ g (* -1 g))) g)) (* 2 g))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 2 g) (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 2 g) (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* a (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* h (* (cbrt 1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))) (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))) (* h (+ (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* -1 (* h (+ (* 1/12 (* (/ (* (cbrt -1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3)))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow g 11)))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow g 14))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2))))))) (* -1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* h (* (cbrt 1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* (cbrt -1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3)))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow g 11)))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow g 14))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* h (* (cbrt 1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (* (cbrt 1/2) (- (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3)))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow g 11)))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow g 14))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))))))))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* h (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* (cbrt (/ g a)) (cbrt 2)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 2))) (+ g (* -1 g))))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))))) (* (cbrt (/ g a)) (cbrt 2)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 2))) (+ g (* -1 g))))) (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (- (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3)))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow g 11)))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow g 14))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))) (pow (cbrt 2) 2)))))))) (* (cbrt (/ g a)) (cbrt 2)))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (+ (* 1/2 (/ (* h (+ g (* -1 g))) (* a g))) (* 2 (/ g a)))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (+ (* 2 (/ g a)) (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (+ g (* -1 g)) (* a g))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (+ (* 2 (/ g a)) (* h (+ (* 1/2 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3)))))))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (+ (* 1/2 (/ (* h (+ g (* -1 g))) g)) (* 2 g))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (+ (* 2 g) (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (+ (* 2 g) (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* 1/12 (* (/ (* (pow h 3) (* (cbrt -1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (pow h 3) (+ (* -1/6 (* (/ (* h (* (cbrt -1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/12 (* (/ (* (cbrt -1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (pow h 3) (+ (* 1/12 (* (/ (* (cbrt -1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* h (+ (* -1/6 (* (/ (* h (* (cbrt -1/2) (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4)))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* -1/6 (* (/ (* (cbrt -1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g))))) (* 1/12 (* (/ (* (pow h 3) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g))))) (* (pow h 3) (+ (* -1/6 (* (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/12 (* (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g))))) (* (pow h 3) (+ (* 1/12 (* (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* h (+ (* -1/6 (* (/ (* h (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* -1/6 (* (/ (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (+ g (* -1 g)) (* a g)))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* h (+ (* -1/2 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))))))))))))
#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 (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* h (+ (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* h (+ (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* h (+ (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (- (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))) (/ g h)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))) (/ g h)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))) (/ g h)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (+ (* -1 (/ g h)) (/ g h)) 1))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (+ (* -1 (/ g h)) (+ (/ g h) (/ (pow g 2) (pow h 2)))) 1))))
#s(approx (+ g h) #s(hole binary64 (* h (+ 1 (/ g h)))))
#s(approx (- g h) #s(hole binary64 (* h (- (/ g h) 1))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (* -1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (+ (* -1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)) (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (+ (* -1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)) (+ (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (* 1/8 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3))))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (/ g h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))) (/ g h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))) (/ g h))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #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 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (pow h 4))) (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) (pow h 5))) (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (pow h 4))) (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3)))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #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 (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) (* a (* h (sqrt -1))))) (+ (/ g (* a h)) (/ (sqrt -1) a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) (* a (* h (sqrt -1))))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (+ (/ g (* a h)) (/ (sqrt -1) a)))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* h (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (* h (sqrt -1))))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (+ (/ g (* a h)) (/ (sqrt -1) a))))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (/ g h))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))) (/ g h)))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))) (/ g h))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* h (- (+ (* 1/2 (/ (+ g (* -1 g)) (* a (* h (sqrt -1))))) (/ (sqrt -1) a)) (/ g (* a h))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* h (- (+ (* 1/2 (/ (+ g (* -1 g)) (* a (* h (sqrt -1))))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (/ (sqrt -1) a))) (/ g (* a h))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* h (- (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (* h (sqrt -1))))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (/ (sqrt -1) a)))) (/ g (* a 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 (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (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 (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (pow h 3))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (pow h 3))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 11))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 11))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (pow h 3))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 11))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (cbrt (* (pow a 2) (* h (sqrt -1)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 5))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (pow h 3))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 11))) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (pow h 3))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))) (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1)))) h)) (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) h)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (* -1 (/ (+ g (* -1 g)) h)) 1))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (* -1 (/ (+ g (+ (* -1 g) (* -1 (/ (pow g 2) h)))) h)) 1))))
#s(approx (+ g h) #s(hole binary64 (* -1 (* h (- (* -1 (/ g h)) 1)))))
#s(approx (- g h) #s(hole binary64 (* -1 (* h (+ 1 (* -1 (/ g h)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 11))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* 1/2 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (* 1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))) (* 1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))) h)) (* -1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1))) (* -1/8 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3))))) h)) (* -1/2 (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) h)) (* -1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))) (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1)))) h)) (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #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 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))) (+ (* 1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) (pow h 3))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) (+ (* -1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))))) h))) (pow h 3))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #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 (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (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 (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))) (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 (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))) (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 (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (cbrt (/ (* h (sqrt -1)) a)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* -1 (/ (+ (* -1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (pow h 3))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (pow h 3))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (/ (* h (sqrt -1)) a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h)) (/ (sqrt -1) a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* h (sqrt -1))))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) h)) (/ (sqrt -1) a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* h (pow (sqrt -1) 3))))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (sqrt -1))))) h)) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) h)) (/ (sqrt -1) a))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (cbrt (/ (* h (sqrt -1)) a)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* -1 (/ (+ (* -1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (pow h 3))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (pow h 3))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (/ (* h (sqrt -1)) a))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h)) (/ (sqrt -1) a))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (- (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* h (sqrt -1))))) (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1))))) (/ g a)) h)) (/ (sqrt -1) a))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (- (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* h (pow (sqrt -1) 3))))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (sqrt -1))))) h)) (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1))))) (/ g a)) h)) (/ (sqrt -1) 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 (* (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 a) #s(hole binary64 (cbrt 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 (/ (- (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 (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 (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2))) a)))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1/2 (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2))) a)))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt 1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt -1/2))) a))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt 1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt -1/2))) a)))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (/ (+ g (sqrt (* (+ g h) (- g h)))) a)))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (/ (- (sqrt (* (+ g h) (- g h))) g) 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 (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2)))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* a (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2)))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) 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 a) #s(hole binary64 (* -1 (* (cbrt a) (cbrt -1)))))
#s(approx (neg (* (cbrt (/ g a)) 1)) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (pow (cbrt -1) 2)))))
#s(approx (* (cbrt (/ g a)) 1) #s(hole binary64 (* (cbrt (/ g a)) (pow (cbrt -1) 2))))
#s(approx (cbrt (/ g a)) #s(hole binary64 (* (cbrt (/ g a)) (pow (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)))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (cbrt -1) (cbrt -1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt 1/2)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* a (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (cbrt -1) (cbrt -1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt 1/2))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (* (cbrt -1) (cbrt 1/2))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt -1)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (* (cbrt -1) (cbrt -1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (cbrt -1) (cbrt -1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt 1/2)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (pow (cbrt -1) 2) (cbrt 1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (pow (cbrt -1) 2) (cbrt -1/2)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (pow (cbrt -1) 2) (cbrt 1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (pow (cbrt -1) 2) (cbrt -1/2))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (pow (cbrt -1) 2) (cbrt 1/2)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (pow (cbrt -1) 2))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (pow (cbrt -1) 2) (cbrt -1/2)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (pow (cbrt -1) 2))))
Calls

9 calls:

TimeVariablePointExpression
36.0ms
a
@-inf
((+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg (* (/ (cbrt g) (cbrt a)) 1)) (* (/ (cbrt g) (cbrt a)) 1) (/ (cbrt g) (cbrt a)) (cbrt g) g (cbrt a) a 1 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg (* (cbrt (/ g a)) 1)) (* (cbrt (/ g a)) 1) (cbrt (/ g a)) (/ g a) (+ (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)) (* 2 a) 2 (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg 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))))) (/ (* -1/4 (* h h)) (* g a)) (* -1/4 (* h h)) -1/4 (* g a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (- (sqrt (* (+ g h) (- g h))) g) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g h) (* a a) (cbrt 1/2) 1/2 (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+ (sqrt (* (+ g h) (- g h))) g) -1/2 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (+ g (sqrt (* (+ g h) (- g h)))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (/ (- (sqrt (* (+ g h) (- g h))) g) a) (cbrt -1/2))
23.0ms
a
@inf
((+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg (* (/ (cbrt g) (cbrt a)) 1)) (* (/ (cbrt g) (cbrt a)) 1) (/ (cbrt g) (cbrt a)) (cbrt g) g (cbrt a) a 1 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg (* (cbrt (/ g a)) 1)) (* (cbrt (/ g a)) 1) (cbrt (/ g a)) (/ g a) (+ (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)) (* 2 a) 2 (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg 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))))) (/ (* -1/4 (* h h)) (* g a)) (* -1/4 (* h h)) -1/4 (* g a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (- (sqrt (* (+ g h) (- g h))) g) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g h) (* a a) (cbrt 1/2) 1/2 (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+ (sqrt (* (+ g h) (- g h))) g) -1/2 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (+ g (sqrt (* (+ g h) (- g h)))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (/ (- (sqrt (* (+ g h) (- g h))) g) a) (cbrt -1/2))
23.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))))))) (neg (* (/ (cbrt g) (cbrt a)) 1)) (* (/ (cbrt g) (cbrt a)) 1) (/ (cbrt g) (cbrt a)) (cbrt g) g (cbrt a) a 1 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg (* (cbrt (/ g a)) 1)) (* (cbrt (/ g a)) 1) (cbrt (/ g a)) (/ g a) (+ (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)) (* 2 a) 2 (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg 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))))) (/ (* -1/4 (* h h)) (* g a)) (* -1/4 (* h h)) -1/4 (* g a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (- (sqrt (* (+ g h) (- g h))) g) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g h) (* a a) (cbrt 1/2) 1/2 (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+ (sqrt (* (+ g h) (- g h))) g) -1/2 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (+ g (sqrt (* (+ g h) (- g h)))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (/ (- (sqrt (* (+ g h) (- g h))) g) a) (cbrt -1/2))
21.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))))))) (neg (* (/ (cbrt g) (cbrt a)) 1)) (* (/ (cbrt g) (cbrt a)) 1) (/ (cbrt g) (cbrt a)) (cbrt g) g (cbrt a) a 1 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg (* (cbrt (/ g a)) 1)) (* (cbrt (/ g a)) 1) (cbrt (/ g a)) (/ g a) (+ (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)) (* 2 a) 2 (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg 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))))) (/ (* -1/4 (* h h)) (* g a)) (* -1/4 (* h h)) -1/4 (* g a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (- (sqrt (* (+ g h) (- g h))) g) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g h) (* a a) (cbrt 1/2) 1/2 (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+ (sqrt (* (+ g h) (- g h))) g) -1/2 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (+ g (sqrt (* (+ g h) (- g h)))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (/ (- (sqrt (* (+ g h) (- g h))) g) a) (cbrt -1/2))
20.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))))))) (neg (* (/ (cbrt g) (cbrt a)) 1)) (* (/ (cbrt g) (cbrt a)) 1) (/ (cbrt g) (cbrt a)) (cbrt g) g (cbrt a) a 1 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg (* (cbrt (/ g a)) 1)) (* (cbrt (/ g a)) 1) (cbrt (/ g a)) (/ g a) (+ (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)) (* 2 a) 2 (+ (neg g) (sqrt (- (* g g) (* h h)))) (neg 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))))) (/ (* -1/4 (* h h)) (* g a)) (* -1/4 (* h h)) -1/4 (* g a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (- (sqrt (* (+ g h) (- g h))) g) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g h) (* a a) (cbrt 1/2) 1/2 (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+ (sqrt (* (+ g h) (- g h))) g) -1/2 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (+ g (sqrt (* (+ g h) (- g h)))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (/ (- (sqrt (* (+ g h) (- g h))) g) a) (cbrt -1/2))

rewrite505.0ms (5.7%)

Memory
50.0MiB live, 648.8MiB allocated; 86ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04644390842072905
0473365484
01401064992
Stop Event
iter limit
node limit
iter limit
Counts
808 → 868
Calls
Call 1
Inputs
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64))))
(neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64)))
(*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64))
(/.f64 (cbrt.f64 g) (cbrt.f64 a))
(cbrt.f64 g)
g
(cbrt.f64 a)
a
#s(literal 1 binary64)
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))))
(neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a))))
#s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))
(cbrt.f64 (/.f64 g a))
(/.f64 g a)
(+.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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))))
(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))
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))
(neg.f64 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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a))
(*.f64 #s(literal -1/4 binary64) (*.f64 h h))
#s(literal -1/4 binary64)
(*.f64 g 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))))))) (/.f64 (+.f64 (*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
(/.f64 (+.f64 (*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a)
(+.f64 (*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))))
(*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64)))
(cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)))
(*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))
(-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)
(sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))
(*.f64 (+.f64 g h) (-.f64 g h))
(+.f64 g h)
(-.f64 g h)
(*.f64 a a)
(cbrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))
(*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))
(+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)
#s(literal -1/2 binary64)
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64))))))
(*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))
#s(literal -1 binary64)
(+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64))))
(*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64)))
(cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a))
(/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)
(+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))
(*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))
(cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a))
(/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)
(cbrt.f64 #s(literal -1/2 binary64))
#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 (neg (* (/ (cbrt g) (cbrt a)) 1)) #s(hole binary64 (* -1 (cbrt (/ g a)))))
#s(approx (* (/ (cbrt g) (cbrt a)) 1) #s(hole binary64 (cbrt (/ g a))))
#s(approx (/ (cbrt g) (cbrt a)) #s(hole binary64 (cbrt (/ g a))))
#s(approx (cbrt g) #s(hole binary64 (cbrt g)))
#s(approx g #s(hole binary64 g))
#s(approx (neg (* (cbrt (/ g a)) 1)) #s(hole binary64 (* -1 (cbrt (/ g a)))))
#s(approx (* (cbrt (/ g a)) 1) #s(hole binary64 (cbrt (/ g a))))
#s(approx (cbrt (/ g a)) #s(hole binary64 (cbrt (/ g a))))
#s(approx (/ g a) #s(hole binary64 (/ g a)))
#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 (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 (/ (* -1/4 (* h h)) (* g a)) #s(hole binary64 (* -1/4 (/ (pow h 2) (* a g)))))
#s(approx (* g a) #s(hole binary64 (* a g)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))) a)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))) (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))))))))))) (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (cbrt (* (pow a 2) (* h (sqrt -1))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (cbrt (* (pow a 2) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (cbrt (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (cbrt (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (* h (sqrt -1)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* (pow a 2) (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))) (* (pow a 2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* g (+ (* -1/4 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))))) (* (pow a 2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (sqrt -1))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)) (* h (sqrt -1)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 1)) (* h (sqrt -1)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))) 1)) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* 1/2 (/ (* g (+ h (* -1 h))) (* h (sqrt -1)))) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))))))) (* h (sqrt -1)))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* -1 (pow h 2))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* -1 (pow h 2)) (* g (+ h (* -1 h))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* -1 (pow h 2)) (* g (+ g (+ h (* -1 h)))))))
#s(approx (+ g h) #s(hole binary64 h))
#s(approx (+ g h) #s(hole binary64 (+ g h)))
#s(approx (- g h) #s(hole binary64 (* -1 h)))
#s(approx (- g h) #s(hole binary64 (- g h)))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 14)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* g (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))))))) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1/2 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* -1/2 (* (pow a 2) (* h (sqrt -1)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* -1/2 (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* -1/4 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1/2 (* (pow a 2) (* h (sqrt -1)))) (* g (+ (* -1/2 (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* g (+ (* -1/4 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/8 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (* h (sqrt -1)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* (pow a 2) (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* (pow a 2) (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* h (sqrt -1)))) (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* g (+ (* g (+ (* -1/4 (/ (* (pow a 2) (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))))) (* (pow a 2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* (pow a 2) (* h (sqrt -1))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (sqrt -1))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (+ 1 (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))))) (* h (sqrt -1)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))))) (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))) (* g (+ (* -1 (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))) (* -1 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))) (* g (+ (* -1 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (* g (+ (* -1 (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))))) (* -1 (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt 1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (cbrt (/ (* h (sqrt -1)) a))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (+ (cbrt (/ (* h (sqrt -1)) a)) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (+ (cbrt (/ (* h (sqrt -1)) a)) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (+ (cbrt (/ (* h (sqrt -1)) a)) (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (/ (* h (sqrt -1)) a)))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (/ (* h (sqrt -1)) a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* h (sqrt -1))))) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (/ (* h (sqrt -1)) a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (+ (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))))) (/ 1 a)))) (/ (* h (sqrt -1)) a))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (+ (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (+ (* g (+ 1 (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))))) (* h (sqrt -1)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (+ (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))))) (* h (sqrt -1)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (cbrt (/ (* h (sqrt -1)) a))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (cbrt (/ (* h (sqrt -1)) a)) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* g (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (cbrt (/ (* h (sqrt -1)) a)) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (cbrt (/ (* h (sqrt -1)) a)) (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* g (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (/ (* h (sqrt -1)) a)))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (+ (* g (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (/ (* h (sqrt -1)) a))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* h (sqrt -1))))) (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1)))))) (/ 1 a))) (/ (* h (sqrt -1)) a))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1)))))))) (/ 1 a))) (/ (* h (sqrt -1)) 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 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 (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* g (+ (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (/ (pow (cbrt 1/2) 2) g)) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (/ (pow (cbrt 1/2) 2) g)) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (/ (pow (cbrt 1/2) 2) g)) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2))))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (cbrt 1/2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/2 (* (pow a 2) (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow (+ h (* -1 h)) 2))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow (+ h (* -1 h)) 5)) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))))))))) (* (pow g 3) (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (cbrt 1/2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (pow (cbrt 1/2) 2)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (cbrt 1/2))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (cbrt 1/2)))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (pow (cbrt 1/2) 2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (cbrt 1/2))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/2 (* (pow a 2) (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow (+ h (* -1 h)) 2))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow (+ h (* -1 h)) 5)) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))))))))) (* (pow g 3) (pow (cbrt 1/2) 2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (pow (cbrt 1/2) 2))))) (* (cbrt (* (pow a 2) (+ h (* -1 h)))) (cbrt 1/2)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* 1/2 (* (pow a 2) (+ h (* -1 h))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (+ h (* -1 h)))) (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 2))) (+ (* 1/2 (* (pow a 2) (+ h (* -1 h)))) (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a 2) (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))) (pow g 3))) (+ (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 2))) (+ (* 1/2 (* (pow a 2) (+ h (* -1 h)))) (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* 1/2 (+ h (* -1 h)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (pow g 3))) (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 g))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (pow g 2)))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (+ (* -1 (/ h g)) (/ h g))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (+ (* -1 (/ h g)) (+ (* -1 (/ (pow h 2) (pow g 2))) (/ h g)))))))
#s(approx (+ g h) #s(hole binary64 g))
#s(approx (+ g h) #s(hole binary64 (* g (+ 1 (/ h g)))))
#s(approx (- g h) #s(hole binary64 g))
#s(approx (- g h) #s(hole binary64 (* g (+ 1 (* -1 (/ h g))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 8))) (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2))))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* g (+ (* -1/12 (* (cbrt (/ (pow a 2) (pow g 11))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 5))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (pow g 8))) (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* (cbrt (/ (pow a 2) (pow g 2))) (* (cbrt -1/2) (cbrt 2)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* (pow a 2) g))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* g (+ (* -1 (pow a 2)) (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* g (+ (* -1 (pow a 2)) (+ (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* -1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* g (+ (* -1 (pow a 2)) (+ (* -1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)) (+ (* -1/4 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (* 1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 3)))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* 2 (* (pow a 2) g))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* g (+ (* 1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* 2 (pow a 2))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* g (+ (* 1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (+ (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (* 2 (pow a 2)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* g (+ (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow g 3))) (+ (* 1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (+ (* 1/2 (/ (* (pow a 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (* 2 (pow a 2))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* 2 g)))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* g (+ 2 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* g (+ 2 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* g (+ 2 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* -1 (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))) (* -1 (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* -1 (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))) (+ (* -1 (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* -1 (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))) (+ (* -1 (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g))) (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))))) (pow (cbrt 1/2) 2))))) (pow g 3))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/2) 2))))))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* g (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))))) (* (pow g 3) (pow (cbrt 1/2) 2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g)))))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (* (cbrt 1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2))))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* g (+ (* -1/12 (* (cbrt (/ 1 (* a (pow g 11)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (* (cbrt 1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* (cbrt (/ g a)) (cbrt 2))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (+ h (* -1 h)) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (cbrt 2))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (+ h (* -1 h)) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (cbrt 2)))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* g (+ (* -1/12 (* (cbrt (/ 1 (* a (pow g 11)))) (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (+ h (* -1 h)) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 8)))) (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow (cbrt 2) 2)))) (* (cbrt (/ 1 (* a (pow g 2)))) (cbrt 2))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* 2 (/ g a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* a g))) (* 2 (/ 1 a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* a g))) (+ (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a (pow g 2)))) (* 2 (/ 1 a)))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* g (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 3)))) (+ (* 1/2 (/ (+ h (* -1 h)) (* a g))) (+ (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a (pow g 2)))) (* 2 (/ 1 a))))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* 2 g)))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* g (+ 2 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* g (+ 2 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* g (+ 2 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* (cbrt (/ (+ h (* -1 h)) a)) (* (cbrt -1/2) (cbrt 1/2)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (* (cbrt (/ (+ h (* -1 h)) a)) (* (cbrt -1/2) (cbrt 1/2))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))))) (* (pow g 2) (pow (cbrt 1/2) 2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (* (cbrt -1/2) (cbrt 1/2)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) a)) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 5))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))))))))))) (* (pow g 3) (pow (cbrt 1/2) 2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))))) (* (pow g 2) (pow (cbrt 1/2) 2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (* (cbrt -1/2) (cbrt 1/2))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/2))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/2)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (pow (cbrt 1/2) 2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/2))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) a)) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 5))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))))))))) (* (pow g 3) (pow (cbrt 1/2) 2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (pow (cbrt 1/2) 2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/2)))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* 1/2 (/ (+ h (* -1 h)) a))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (+ (* 1/2 (/ (+ h (* -1 h)) a)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 2)))) (+ (* 1/2 (/ (+ h (* -1 h)) a)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g)))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (* a (pow g 3)))) (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 2)))) (+ (* 1/2 (/ (+ h (* -1 h)) a)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a 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 (* -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 (neg (* (/ (cbrt g) (cbrt a)) 1)) #s(hole binary64 (* (cbrt (/ g a)) (cbrt -1))))
#s(approx (* (/ (cbrt g) (cbrt a)) 1) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#s(approx (/ (cbrt g) (cbrt a)) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#s(approx (cbrt g) #s(hole binary64 (* -1 (* (cbrt g) (cbrt -1)))))
#s(approx (neg (* (cbrt (/ g a)) 1)) #s(hole binary64 (* (cbrt (/ g a)) (cbrt -1))))
#s(approx (* (cbrt (/ g a)) 1) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#s(approx (cbrt (/ g a)) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#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 (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* g (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))) a))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* g (+ 1 (pow (sqrt -1) 2))))) (cbrt 1/2)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ (pow a 2) (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) g) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) g) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (cbrt (* (pow a 2) (* g (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (* -1/6 (* (cbrt (/ (pow a 2) (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (+ h (* -1 h)))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) g) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (+ h (* -1 h))))) (pow g 3))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) g) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (+ h (* -1 h))))) (pow g 3))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* g (+ 1 (pow (sqrt -1) 2)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* (pow a 2) (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (+ 1 (pow (sqrt -1) 2))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (pow (sqrt -1) 2))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (pow (sqrt -1) 2)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (* -1 (/ (+ (* -1 (+ h (* -1 h))) (/ (pow h 2) g)) g))))))
#s(approx (+ g h) #s(hole binary64 (* -1 (* g (- (* -1 (/ h g)) 1)))))
#s(approx (- g h) #s(hole binary64 (* -1 (* g (- (/ h g) 1)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* g (- (pow (sqrt -1) 2) 1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ (pow a 2) (* (pow g 5) (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) g) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) g) (pow (- (pow (sqrt -1) 2) 1) 2))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow g 4)) (pow (- (pow (sqrt -1) 2) 1) 2))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* 1/2 (* (pow a 2) (* g (- (pow (sqrt -1) 2) 1))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* g (+ (* -1/2 (* (pow a 2) (- (pow (sqrt -1) 2) 1))) (* 1/4 (/ (* (pow a 2) (+ h (* -1 h))) g)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/4 (* (pow a 2) (+ h (* -1 h)))) (* 1/4 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g))) g)) (* -1/2 (* (pow a 2) (- (pow (sqrt -1) 2) 1))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* -1/8 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2))))) g)) (* -1/4 (* (pow a 2) (+ h (* -1 h))))) g)) (* -1/2 (* (pow a 2) (- (pow (sqrt -1) 2) 1))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* g (- (pow (sqrt -1) 2) 1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (* (pow a 2) (+ h (* -1 h))) g)) (* (pow a 2) (- (pow (sqrt -1) 2) 1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (- (pow (sqrt -1) 2) 1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (* (pow a 2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/2 (* (pow a 2) (+ h (* -1 h))))) g)) (* (pow a 2) (- (pow (sqrt -1) 2) 1)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (pow (sqrt -1) 2) 1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* g (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))) a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (- (pow (sqrt -1) 2) 1) 2))))) (* (cbrt 1/2) (+ h (* -1 h)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))))) (+ (* 1/6 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) (pow g 3))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) (+ (* -1/12 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))))) g))) (pow g 3))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* g (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2))))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* (cbrt (/ (* g (- (pow (sqrt -1) 2) 1)) a)) (cbrt 1/2)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (- (pow (sqrt -1) 2) 1) 2))))) (* (cbrt 1/2) (+ h (* -1 h))))) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (cbrt (/ (* g (- (pow (sqrt -1) 2) 1)) a)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (* -1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (- (pow (sqrt -1) 2) 1) 2))))) (+ h (* -1 h)))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (* -1 (/ (+ (* -1/6 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (+ h (* -1 h))))) (pow g 3))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (+ h (* -1 h))))) (pow g 3))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (/ (* g (- (pow (sqrt -1) 2) 1)) a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (* g (- (+ (* -1/2 (/ (+ h (* -1 h)) (* a g))) (/ (pow (sqrt -1) 2) a)) (/ 1 a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) (* a g))) (* 1/2 (/ (+ h (* -1 h)) a))) g)) (/ (pow (sqrt -1) 2) a)) (/ 1 a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* a (* g (pow (sqrt -1) 2))))) (* 1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) a))) g)) (* 1/2 (/ (+ h (* -1 h)) a))) g)) (/ (pow (sqrt -1) 2) a)) (/ 1 a))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* g (- (pow (sqrt -1) 2) 1)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* g (- (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* g (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)) 1)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* (cbrt (/ (* g (+ 1 (pow (sqrt -1) 2))) a)) (cbrt -1/2)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (* (cbrt -1/2) (+ h (* -1 h))))) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (cbrt (/ (* g (+ 1 (pow (sqrt -1) 2))) a)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (* -1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (+ h (* -1 h)))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (* -1 (/ (+ (* -1/6 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (+ h (* -1 h))))) (pow g 3))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (* g (+ (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 2)))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) g)) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (+ h (* -1 h))))) (pow g 3))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (/ (* g (+ 1 (pow (sqrt -1) 2))) a))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (+ h (* -1 h)) (* a g))) (+ (/ 1 a) (/ (pow (sqrt -1) 2) a)))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) (* a g))) (* 1/2 (/ (+ h (* -1 h)) a))) g)) (+ (/ 1 a) (/ (pow (sqrt -1) 2) a)))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* a (* g (pow (sqrt -1) 2))))) (* 1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) a))) g)) (* 1/2 (/ (+ h (* -1 h)) a))) g)) (+ (/ 1 a) (/ (pow (sqrt -1) 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 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 (* -1/4 (* h h)) #s(hole binary64 (* -1/4 (pow h 2))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))) a)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* a (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* (pow a 2) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* 1/12 (* (/ (* (pow a 2) (* (pow h 3) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (pow h 3) (+ (* -1/6 (* (/ (* (pow a 2) (* h (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/12 (* (/ (* (pow a 2) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (pow h 3) (+ (* 1/12 (* (/ (* (pow a 2) (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* h (+ (* -1/6 (* (/ (* (pow a 2) (* h (* (cbrt 1/2) (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4))))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* -1/6 (* (/ (* (pow a 2) (* (cbrt 1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))) (* 1/12 (* (/ (* (pow a 2) (* (pow h 3) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))) (* (pow h 3) (+ (* -1/6 (* (/ (* (pow a 2) (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/12 (* (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (+ (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))) (* (pow h 3) (+ (* 1/12 (* (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* h (+ (* -1/6 (* (/ (* (pow a 2) (* h (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4)))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* -1/6 (* (/ (* (pow a 2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) g) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* -1/2 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/4 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) g)) (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* 1/2 (/ (* h (+ g (* -1 g))) g))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* h (+ (* -1/2 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) g)) (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (pow g 3)))))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* 1/2 (/ (* h (+ g (* -1 g))) g)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* h (+ g (* -1 g))) (pow g 2))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* h (+ g (+ (* -1 g) (* -1 h)))) (pow g 2))))
#s(approx (- g h) #s(hole binary64 (+ g (* -1 h))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 14)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))))))))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ 1 (* (pow a 4) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1 (* (pow a 2) g)) (* -1/4 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1 (* (pow a 2) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* 1/4 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (+ (* -1 (* (pow a 2) g)) (* h (+ (* -1/4 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/8 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3))) (* 1/4 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)) (* 2 (* (pow a 2) g)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 2 (* (pow a 2) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (+ (* 2 (* (pow a 2) g)) (* h (+ (* 1/2 (/ (* (pow a 2) (+ g (* -1 g))) g)) (* h (+ (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/4 (/ (* (pow a 2) (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3))))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 1/2 (/ (* h (+ g (* -1 g))) g)) (* 2 g))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 2 g) (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (+ (* 2 g) (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* a (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* h (* (cbrt 1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))) (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))) (* h (+ (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* -1 (* h (+ (* 1/12 (* (/ (* (cbrt -1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3)))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow g 11)))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow g 14))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2))))))) (* -1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* h (* (cbrt 1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* (cbrt -1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3)))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow g 11)))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow g 14))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* h (* (cbrt 1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (* (cbrt 1/2) (- (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3)))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow g 11)))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow g 14))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))))))))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* h (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* (cbrt (/ g a)) (cbrt 2)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 2))) (+ g (* -1 g))))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))))) (* (cbrt (/ g a)) (cbrt 2)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 2))) (+ g (* -1 g))))) (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (- (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3)))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow g 11)))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow g 14))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))) (pow (cbrt 2) 2)))))))) (* (cbrt (/ g a)) (cbrt 2)))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (+ (* 1/2 (/ (* h (+ g (* -1 g))) (* a g))) (* 2 (/ g a)))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (+ (* 2 (/ g a)) (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (+ g (* -1 g)) (* a g))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (+ (* 2 (/ g a)) (* h (+ (* 1/2 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3)))))))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (+ (* 1/2 (/ (* h (+ g (* -1 g))) g)) (* 2 g))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (+ (* 2 g) (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (+ (* 2 g) (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* 1/12 (* (/ (* (pow h 3) (* (cbrt -1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (pow h 3) (+ (* -1/6 (* (/ (* h (* (cbrt -1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/12 (* (/ (* (cbrt -1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (pow h 3) (+ (* 1/12 (* (/ (* (cbrt -1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* h (+ (* -1/6 (* (/ (* h (* (cbrt -1/2) (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4)))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* -1/6 (* (/ (* (cbrt -1/2) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g))))) (* 1/12 (* (/ (* (pow h 3) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g))))) (* (pow h 3) (+ (* -1/6 (* (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/12 (* (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (+ (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g))))) (* (pow h 3) (+ (* 1/12 (* (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* h (+ (* -1/6 (* (/ (* h (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* -1/6 (* (/ (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (+ g (* -1 g)) (* a g)))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* h (+ (* -1/2 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))))))))))))
#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 (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* h (+ (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* h (+ (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* h (+ (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (- (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))) (/ g h)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))) (/ g h)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))) (/ g h)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (+ (* -1 (/ g h)) (/ g h)) 1))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (+ (* -1 (/ g h)) (+ (/ g h) (/ (pow g 2) (pow h 2)))) 1))))
#s(approx (+ g h) #s(hole binary64 (* h (+ 1 (/ g h)))))
#s(approx (- g h) #s(hole binary64 (* h (- (/ g h) 1))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ (pow a 2) (* (pow h 11) (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ (pow a 2) (* (pow h 8) (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (* -1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (+ (* -1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)) (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (+ (* -1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)) (+ (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (* 1/8 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3))))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* h (+ (* -1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 2) (sqrt -1)))) (+ (* (pow a 2) (sqrt -1)) (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (/ g h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))) (/ g h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))) (/ g h))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #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 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (pow h 4))) (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) (pow h 5))) (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (pow h 4))) (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3)))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #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 (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) (* a (* h (sqrt -1))))) (+ (/ g (* a h)) (/ (sqrt -1) a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) (* a (* h (sqrt -1))))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (+ (/ g (* a h)) (/ (sqrt -1) a)))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* h (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (* h (sqrt -1))))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (+ (/ g (* a h)) (/ (sqrt -1) a))))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (/ g h))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))) (/ g h)))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))) (/ g h))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* h (- (+ (* 1/2 (/ (+ g (* -1 g)) (* a (* h (sqrt -1))))) (/ (sqrt -1) a)) (/ g (* a h))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* h (- (+ (* 1/2 (/ (+ g (* -1 g)) (* a (* h (sqrt -1))))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (/ (sqrt -1) a))) (/ g (* a h))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* h (- (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (* h (sqrt -1))))) (+ (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (/ (sqrt -1) a)))) (/ g (* a 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 (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (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 (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (pow h 3))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (pow h 3))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 11))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 11))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (pow h 3))) (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 11))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (cbrt (* (pow a 2) (* h (sqrt -1)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 5))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (pow h 3))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 11))) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (pow h 3))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))) (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1)))) h)) (* (pow a 2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) h)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (* -1 (/ (+ g (* -1 g)) h)) 1))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (* -1 (/ (+ g (+ (* -1 g) (* -1 (/ (pow g 2) h)))) h)) 1))))
#s(approx (+ g h) #s(hole binary64 (* -1 (* h (- (* -1 (/ g h)) 1)))))
#s(approx (- g h) #s(hole binary64 (* -1 (* h (+ 1 (* -1 (/ g h)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (* (pow a 2) h) (pow (sqrt -1) 11))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 5))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))))) (pow h 3))) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* 1/2 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* h (+ (* -1/2 (* (pow a 2) (sqrt -1))) (* 1/2 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))) (* 1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))) h)) (* -1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1))) (* -1/8 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3))))) h)) (* -1/2 (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) h)) (* -1/2 (* (pow a 2) (sqrt -1))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* (pow a 2) (* h (sqrt -1))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))) (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (pow a 2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (* (pow a 2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (sqrt -1)))) h)) (* (pow a 2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))))) h)) (* (pow a 2) (sqrt -1)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #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 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))) (+ (* 1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) (pow h 3))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) (+ (* -1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))))) h))) (pow h 3))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #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 (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (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 (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))) (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 (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))) (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 (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (cbrt (/ (* h (sqrt -1)) a)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* -1 (/ (+ (* -1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (pow h 3))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (pow h 3))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (/ (* h (sqrt -1)) a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h)) (/ (sqrt -1) a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* h (sqrt -1))))) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) h)) (/ (sqrt -1) a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* h (pow (sqrt -1) 3))))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (sqrt -1))))) h)) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) h)) (/ (sqrt -1) a))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ g (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))) h)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (cbrt (/ (* h (sqrt -1)) a)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* -1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* -1 (/ (+ (* -1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (pow h 3))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* -1 (* h (+ (cbrt (/ (sqrt -1) (* a (pow h 2)))) (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) h)) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (pow h 3))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (/ (* h (sqrt -1)) a))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h)) (/ (sqrt -1) a))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (- (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* h (sqrt -1))))) (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1))))) (/ g a)) h)) (/ (sqrt -1) a))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (- (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* h (pow (sqrt -1) 3))))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (sqrt -1))))) h)) (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1))))) (/ g a)) h)) (/ (sqrt -1) 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 (* (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 a) #s(hole binary64 (cbrt 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 (/ (- (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 (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 (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2))) a)))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) #s(hole binary64 (* -1/2 (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) #s(hole binary64 (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2))) a)))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt 1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt -1/2))) a))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt 1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt -1/2))) a)))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) #s(hole binary64 (/ (+ g (sqrt (* (+ g h) (- g h)))) a)))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) #s(hole binary64 (/ (- (sqrt (* (+ g h) (- g h))) g) 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 (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2)))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* a (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2)))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) 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 a) #s(hole binary64 (* -1 (* (cbrt a) (cbrt -1)))))
#s(approx (neg (* (cbrt (/ g a)) 1)) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (pow (cbrt -1) 2)))))
#s(approx (* (cbrt (/ g a)) 1) #s(hole binary64 (* (cbrt (/ g a)) (pow (cbrt -1) 2))))
#s(approx (cbrt (/ g a)) #s(hole binary64 (* (cbrt (/ g a)) (pow (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)))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (cbrt -1) (cbrt -1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt 1/2)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) #s(hole binary64 (* -1 (* a (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (cbrt -1) (cbrt -1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt 1/2))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (* (cbrt -1) (cbrt 1/2))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt -1)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) #s(hole binary64 (* -1 (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (* (cbrt -1) (cbrt -1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (cbrt -1) (cbrt -1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt 1/2)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (pow (cbrt -1) 2) (cbrt 1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (pow (cbrt -1) 2) (cbrt -1/2)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (pow (cbrt -1) 2) (cbrt 1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (pow (cbrt -1) 2) (cbrt -1/2))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) #s(hole binary64 (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (pow (cbrt -1) 2) (cbrt 1/2)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) #s(hole binary64 (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (pow (cbrt -1) 2))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (pow (cbrt -1) 2) (cbrt -1/2)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (pow (cbrt -1) 2))))
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))))))) (neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
(neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))
(*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))
(pow.f64 (/.f64 g a) #s(literal 1/3 binary64))
(/.f64 (neg.f64 (cbrt.f64 g)) (neg.f64 (cbrt.f64 a)))
(/.f64 (cbrt.f64 g) (cbrt.f64 a))
(cbrt.f64 (/.f64 g a))
(pow.f64 g #s(literal 1/3 binary64))
(cbrt.f64 g)
g
(pow.f64 a #s(literal 1/3 binary64))
(cbrt.f64 a)
a
#s(literal 1 binary64)
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))))
(neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a))))
#s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))
(pow.f64 (/.f64 g a) #s(literal 1/3 binary64))
(/.f64 (neg.f64 (cbrt.f64 g)) (neg.f64 (cbrt.f64 a)))
(/.f64 (cbrt.f64 g) (cbrt.f64 a))
(cbrt.f64 (/.f64 g a))
(/.f64 (neg.f64 g) (neg.f64 a))
(/.f64 g a)
(/.f64 (+.f64 (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (/.f64 #s(literal -1/4 binary64) g) (/.f64 (*.f64 h h) a)))) #s(literal 3 binary64))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))) (-.f64 (*.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (/.f64 #s(literal -1/4 binary64) g) (/.f64 (*.f64 h h) a)))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (/.f64 #s(literal -1/4 binary64) g) (/.f64 (*.f64 h h) a))))) (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (/.f64 #s(literal -1/4 binary64) g) (/.f64 (*.f64 h h) a))))))))
(+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (/.f64 #s(literal -1/4 binary64) g) (/.f64 (*.f64 h h) a)))))
(*.f64 (cbrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))) (cbrt.f64 (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))
(pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))
(pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 2 binary64) a)))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))
(*.f64 #s(literal 2 binary64) a)
#s(literal 2 binary64)
(/.f64 (+.f64 (pow.f64 (neg.f64 g) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) #s(literal 3 binary64))) (+.f64 (*.f64 g g) (-.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) (*.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))))
(neg.f64 g)
(pow.f64 (-.f64 (*.f64 g g) (*.f64 h h)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))
(-.f64 (*.f64 g g) (*.f64 h h))
(*.f64 (fabs.f64 g) (fabs.f64 g))
(*.f64 (neg.f64 g) (neg.f64 g))
(*.f64 g g)
(pow.f64 g #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 g) #s(literal 2 binary64)))
(*.f64 (neg.f64 h) (neg.f64 h))
(*.f64 (fabs.f64 h) (fabs.f64 h))
(*.f64 h h)
(pow.f64 h #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 h) #s(literal 2 binary64)))
h
(pow.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (/.f64 #s(literal -1/4 binary64) g) (/.f64 (*.f64 h h) a))) #s(literal 1/3 binary64))
(cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (/.f64 #s(literal -1/4 binary64) g) (/.f64 (*.f64 h h) a))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (/.f64 #s(literal -1/4 binary64) g) (/.f64 (*.f64 h h) a)))
(*.f64 (/.f64 #s(literal -1/4 binary64) g) (/.f64 (*.f64 h h) a))
(/.f64 (neg.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h))) (neg.f64 (*.f64 g a)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a))
(*.f64 #s(literal -1/4 binary64) (*.f64 h h))
#s(literal -1/4 binary64)
(*.f64 g 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))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
(/.f64 (neg.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))))) (neg.f64 a))
(/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a)
(+.f64 (/.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) a) (/.f64 (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))) a))
(/.f64 (+.f64 (pow.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) (*.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))))))
(+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))))
(*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64)))
(pow.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64)) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64)))
(*.f64 (cbrt.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) (cbrt.f64 (*.f64 a a)))
(pow.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)))
(*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))
(-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)
(*.f64 (sqrt.f64 (+.f64 g h)) (sqrt.f64 (-.f64 g h)))
(pow.f64 (*.f64 (+.f64 g h) (-.f64 g h)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))
(*.f64 (+.f64 g h) (-.f64 g h))
(/.f64 (+.f64 (pow.f64 g #s(literal 3 binary64)) (pow.f64 h #s(literal 3 binary64))) (+.f64 (*.f64 g g) (-.f64 (*.f64 h h) (*.f64 g h))))
(+.f64 g h)
(-.f64 g h)
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 a a)
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
(*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 #s(literal -1/2 binary64)))
(pow.f64 #s(literal 1/2 binary64) #s(literal 1/3 binary64))
(cbrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 (cbrt.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64))
(*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 3 binary64)) (pow.f64 g #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) (-.f64 (*.f64 g g) (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g))))
(+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)
#s(literal -1/2 binary64)
#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(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64)))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))))))
(*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64)))))
#s(literal -1 binary64)
(/.f64 (+.f64 (pow.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64)))) (*.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64)))))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))))
(*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64)))
(cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64)))
(pow.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/3 binary64))
(/.f64 (cbrt.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) (cbrt.f64 a))
(cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a))
(/.f64 (neg.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) (neg.f64 a))
(/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)
(+.f64 (/.f64 g a) (/.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) a))
(/.f64 (+.f64 (pow.f64 g #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 3 binary64))) (+.f64 (*.f64 g g) (-.f64 (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) (*.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))
(+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))
(*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))
(cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64)))
(pow.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/3 binary64))
(/.f64 (cbrt.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) (cbrt.f64 a))
(cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a))
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) (neg.f64 a))
(/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)
(-.f64 (/.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) a) (/.f64 g a))
(*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))
(pow.f64 #s(literal -1/2 binary64) #s(literal 1/3 binary64))
(cbrt.f64 #s(literal -1/2 binary64))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))))) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))) (*.f64 #s(literal -1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (neg (* (cbrt (/ g a)) 1)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (/.f64 g a))))
#s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))
#s(approx (/ (cbrt g) (cbrt a)) (cbrt.f64 (/.f64 g a)))
#s(approx (cbrt g) (cbrt.f64 g))
#s(approx g g)
#s(approx (neg (* (cbrt (/ g a)) 1)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (/.f64 g a))))
#s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))
#s(approx (/ (cbrt g) (cbrt a)) (cbrt.f64 (/.f64 g a)))
#s(approx (/ g a) (/.f64 g a))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))) (*.f64 #s(literal -1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 g (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (-.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 g g) (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (+.f64 (*.f64 #s(literal -1 binary64) g) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (+.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 g (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (+.f64 (*.f64 g (-.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 g g) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (neg g) (*.f64 #s(literal -1 binary64) g))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 g g) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 g g) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)))))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 g g) (+.f64 (*.f64 (*.f64 g g) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 g g) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)))))))
#s(approx (- (* g g) (* h h)) (*.f64 #s(literal -1 binary64) (*.f64 h h)))
#s(approx (- (* g g) (* h h)) (-.f64 (*.f64 g g) (*.f64 h h)))
#s(approx (* g g) (*.f64 g g))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 g (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (-.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 g g) (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (* -1/4 (* h h)) (* g a)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g))))
#s(approx (* g a) (*.f64 a g))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))) a))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))))))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))) (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))))))))))) (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))))))))))))))))) (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (+.f64 (cbrt.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (+.f64 (cbrt.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (+.f64 (cbrt.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 g (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 (*.f64 a a) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (*.f64 g (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 g (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (sqrt (* (+ g h) (- g h))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ g h) (- g h))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ g h) (- g h))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (+ g h) (- g h)) (*.f64 #s(literal -1 binary64) (*.f64 h h)))
#s(approx (* (+ g h) (- g h)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h)))))
#s(approx (* (+ g h) (- g h)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 g (+.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h))))))
#s(approx (+ g h) h)
#s(approx (+ g h) (+.f64 g h))
#s(approx (- g h) (*.f64 #s(literal -1 binary64) h))
#s(approx (- g h) (-.f64 g h))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 14 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (*.f64 g (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 (*.f64 a a) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (*.f64 g (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 g (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))) a))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))))))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))))))))))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (+.f64 (cbrt.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (+.f64 (cbrt.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (+.f64 (cbrt.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 g a) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) (pow.f64 a #s(literal -1 binary64))))) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (+.f64 (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (+.f64 (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (+.f64 (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (+.f64 (cbrt.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (+.f64 (cbrt.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (+.f64 (cbrt.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) h) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (+.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (+.f64 (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) (pow.f64 a #s(literal -1 binary64)))) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (+.f64 (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 g a) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (pow.f64 a #s(literal -1 binary64)))) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) 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))))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (cbrt.f64 #s(literal -1/4 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 10 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (cbrt.f64 #s(literal -1/4 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 10 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 16 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (cbrt.f64 #s(literal -1/4 binary64))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (cbrt.f64 #s(literal -1/4 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (cbrt.f64 #s(literal -1/4 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 13 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (cbrt.f64 #s(literal -1/4 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 13 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/576 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 13 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 5 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (cbrt.f64 #s(literal -1/4 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) a)) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g))))) g))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) a)) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))))) g))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 h #s(literal 8 binary64))) (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 8 binary64)))) (*.f64 a (pow.f64 g #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) a)) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64)))))))) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g)))) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 4 binary64)))))) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 h #s(literal 8 binary64))) (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 8 binary64)))) (pow.f64 g #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 4 binary64))))))) g))
#s(approx (sqrt (- (* g g) (* h h))) g)
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 6 binary64)))))))))
#s(approx (- (* g g) (* h h)) (*.f64 g g))
#s(approx (- (* g g) (* h h)) (*.f64 (*.f64 g g) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h h) (*.f64 g g))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 20 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 g g) a) (/.f64 (pow.f64 h #s(literal 4 binary64)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 g a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 g (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g))))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g)))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g)) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (cbrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g)) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (cbrt.f64 #s(literal -1 binary64)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 5 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g)) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (cbrt.f64 #s(literal -1 binary64)))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal 1/2 binary64))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal 1/2 binary64))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal 1/2 binary64)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g))))))
#s(approx (sqrt (* (+ g h) (- g h))) g)
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g))))))))
#s(approx (* (+ g h) (- g h)) (*.f64 g g))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 g g) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) (/.f64 h g)))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 g g) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (/.f64 h g))))))
#s(approx (+ g h) g)
#s(approx (+ g h) (*.f64 g (+.f64 #s(literal 1 binary64) (/.f64 h g))))
#s(approx (- g h) g)
#s(approx (- g h) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 h g)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 5 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (cbrt.f64 #s(literal -1 binary64))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 5 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 8 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (cbrt.f64 #s(literal -1 binary64)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 g (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 11 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 5 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 8 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (cbrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) g)))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a a)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a a)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 a a)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (pow.f64 g #s(literal 3 binary64)))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) g)))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (*.f64 #s(literal 2 binary64) (*.f64 a a)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (*.f64 #s(literal 2 binary64) (*.f64 a a))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (*.f64 #s(literal 2 binary64) (*.f64 a a)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal 2 binary64) g))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 g (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 g (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 g (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g)))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (cbrt.f64 #s(literal -1/4 binary64)) g))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (cbrt.f64 #s(literal -1/4 binary64)) g))) (*.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g)) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (cbrt.f64 #s(literal -1/4 binary64)) g))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a)) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g)) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64)) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (cbrt.f64 #s(literal -1/4 binary64)) g)))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g)) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64)) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (cbrt.f64 #s(literal -1/4 binary64)) g))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g)) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 g #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64)) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (cbrt.f64 #s(literal -1/4 binary64)) g))))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 g (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64)))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal 2 binary64))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal 2 binary64))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 g (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 #s(literal 2 binary64) (/.f64 g a)))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a g))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 a (pow.f64 g #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal 2 binary64) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 #s(literal 2 binary64) g))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 g (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 g (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 g (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (cbrt.f64 #s(literal -1/4 binary64))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (cbrt.f64 #s(literal -1/4 binary64)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (cbrt.f64 #s(literal -1/4 binary64))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) g) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 g #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) a)) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (cbrt.f64 #s(literal -1/4 binary64)))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt.f64 (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) #s(literal 1/2 binary64))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) #s(literal 1/2 binary64))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) a)) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) #s(literal 1/2 binary64)))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 a g)))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 a g))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 a (pow.f64 g #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 a 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a)) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) g)) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a)) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) g)) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (neg (* (cbrt (/ g a)) 1)) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (* (cbrt (/ g a)) 1) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (/ (cbrt g) (cbrt a)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (cbrt g) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 g #s(literal -1 binary64)))))
#s(approx (neg (* (cbrt (/ g a)) 1)) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (* (cbrt (/ g a)) 1) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (/ (cbrt g) (cbrt a)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 20 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 g g) a) (/.f64 (pow.f64 h #s(literal 4 binary64)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 g a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 6 binary64))))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -2 binary64) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 6 binary64))))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) g))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g)))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 6 binary64))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/576 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (/.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) a))) g)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) a)))) g)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 h #s(literal 8 binary64))) (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 8 binary64)))) (*.f64 a (pow.f64 g #s(literal 6 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) a))))) g)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))) a)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 g #s(literal 0 binary64))) #s(literal 1/2 binary64)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) g) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) g) #s(literal 0 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 a a) (*.f64 g #s(literal 0 binary64))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 0 binary64)))) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) g) #s(literal 0 binary64))) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (pow.f64 g #s(literal 3 binary64))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) g) #s(literal 0 binary64))) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) g)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 0 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (pow.f64 g #s(literal 3 binary64))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 g #s(literal 0 binary64)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (*.f64 (*.f64 a a) #s(literal 0 binary64))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) g)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) g)) (*.f64 (*.f64 a a) #s(literal 0 binary64))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) g)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) g)) (*.f64 (*.f64 a a) #s(literal 0 binary64))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g #s(literal 0 binary64))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) #s(literal -1 binary64))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 g #s(literal -1 binary64))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64)))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 g g) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (/.f64 (*.f64 h h) g)) g)))))
#s(approx (+ g h) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) #s(literal 1 binary64)))))
#s(approx (- g h) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (/.f64 h g) #s(literal 1 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 g #s(literal -2 binary64))) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) g) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) g) #s(literal 4 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 g #s(literal 4 binary64))) #s(literal 4 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 g #s(literal -2 binary64)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) g))) g)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) #s(literal -2 binary64)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 g #s(literal -1 binary64))))) g)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) g)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) #s(literal -2 binary64)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 g #s(literal -2 binary64)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))) g)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) g)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) g)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) g)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) g)) (*.f64 (*.f64 a a) #s(literal -2 binary64))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g #s(literal -2 binary64))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))) a)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 0 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) (pow.f64 g #s(literal 3 binary64))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 0 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))))) g))) (pow.f64 g #s(literal 3 binary64))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 g #s(literal -2 binary64)) a) #s(literal 1/2 binary64)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (/.f64 (*.f64 g #s(literal -2 binary64)) a))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 4 binary64))) #s(literal -1 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 4 binary64)))) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (pow.f64 g #s(literal 3 binary64))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) g)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (pow.f64 g #s(literal 3 binary64))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 g #s(literal -2 binary64)) a)))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a g))) (/.f64 #s(literal -1 binary64) a)) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a g))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a))) g)) (/.f64 #s(literal -1 binary64) a)) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 a (*.f64 g #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) a))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a))) g)) (/.f64 #s(literal -1 binary64) a)) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 #s(literal -1 binary64) (*.f64 g #s(literal -2 binary64))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 g #s(literal 0 binary64)) a) #s(literal -1/2 binary64)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 0 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 0 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (/.f64 (*.f64 g #s(literal 0 binary64)) a))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 0 binary64))) #s(literal -1 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 0 binary64)))) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (pow.f64 g #s(literal 3 binary64))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 0 binary64)))) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) g)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (pow.f64 g #s(literal 3 binary64))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 g #s(literal 0 binary64)) a)))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a g))) (/.f64 #s(literal 0 binary64) a)))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a g))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a))) g)) (/.f64 #s(literal 0 binary64) a)))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 a (*.f64 g #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) a))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a))) g)) (/.f64 #s(literal 0 binary64) 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))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (cbrt.f64 #s(literal -1/4 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (cbrt.f64 #s(literal -1/4 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (+.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (cbrt.f64 #s(literal -1/4 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (+.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (cbrt.f64 #s(literal -1/4 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 13 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/216 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 6 binary64)))) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64)))) (*.f64 (*.f64 g g) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (cbrt.f64 #s(literal -1/4 binary64))) (*.f64 (pow.f64 h #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 13 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (cbrt.f64 #s(literal -1/4 binary64))) (*.f64 (pow.f64 h #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (pow.f64 (*.f64 g h) #s(literal 2 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/192 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) (*.f64 (*.f64 h h) #s(literal -1/2 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 5/128 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 7 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 13 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 5 binary64))))) (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -5/256 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (*.f64 #s(literal 1/32 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -5/128 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 7 binary64)))) (*.f64 #s(literal 1/16 binary64) (pow.f64 g #s(literal -5 binary64))))) (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64)))))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64)))))))
#s(approx (- (* g g) (* h h)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 g g)))
#s(approx (* h h) (*.f64 h h))
#s(approx h h)
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (*.f64 h h) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (*.f64 h h) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/216 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 6 binary64)))) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64)))) (*.f64 (*.f64 g g) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g a)) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g a)) (*.f64 (*.f64 h h) (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 5 binary64))))) (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64)))))))
#s(approx (* -1/4 (* h h)) (*.f64 #s(literal -1/4 binary64) (*.f64 h h)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))) a))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 g g)))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (pow.f64 g #s(literal 11 binary64)))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 g #s(literal 14 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 g g)))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (pow.f64 g #s(literal 11 binary64)))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 g #s(literal 14 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))))) g) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64)))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) (*.f64 g g))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 4 binary64)))))))) g) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))))) g) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64)))))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g)))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g)))) (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 3 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g)))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))))) g) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64)))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g)))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) (*.f64 g g))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 4 binary64))))))) g) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) g) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64)))))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g)))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64)))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))))))))))
#s(approx (sqrt (* (+ g h) (- g h))) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) g))))
#s(approx (sqrt (* (+ g h) (- g h))) (+.f64 g (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))))
#s(approx (sqrt (* (+ g h) (- g h))) (+.f64 g (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64))))))))))
#s(approx (* (+ g h) (- g h)) (+.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) (*.f64 g g)))
#s(approx (* (+ g h) (- g h)) (+.f64 (*.f64 h (+.f64 g (+.f64 (*.f64 #s(literal -1 binary64) g) (*.f64 #s(literal -1 binary64) h)))) (*.f64 g g)))
#s(approx (- g h) (+.f64 g (*.f64 #s(literal -1 binary64) h)))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 g g)))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 14 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 g g)))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (pow.f64 g #s(literal 11 binary64)))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 g #s(literal 14 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) g)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) g))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) g)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 #s(literal 2 binary64) g)))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal 2 binary64) g) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal 2 binary64) g) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64))))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))) a))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 g g)))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (pow.f64 g #s(literal 11 binary64)))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 g #s(literal 14 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))) (*.f64 h (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal 2 binary64)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 h (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal 2 binary64)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 h (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal 2 binary64)))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))) (*.f64 #s(literal 2 binary64) (/.f64 g a))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 g a)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g)))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 g a)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))))))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)) (*.f64 #s(literal 2 binary64) g)))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (+.f64 (*.f64 #s(literal 2 binary64) g) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (+.f64 (*.f64 #s(literal 2 binary64) g) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64))))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) a) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (/.f64 h a) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64)))))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (/.f64 h a) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) (*.f64 g g))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 4 binary64)))))) g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) a) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64)))))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64)))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (/.f64 h a) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64)))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (/.f64 h a) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) (*.f64 g g))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 4 binary64))))) g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64)))))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64))))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64))))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 g h)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 g h))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 g h))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 g #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (- (* g g) (* h h)) (*.f64 (*.f64 h h) (-.f64 (/.f64 (*.f64 g g) (*.f64 h h)) #s(literal 1 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))) a))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64)))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)) h))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)) h)))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)) h))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 g h))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 g h))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 g h))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 h h) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g h)) (/.f64 g h)) #s(literal 1 binary64))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 h h) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g h)) (+.f64 (/.f64 g h) (/.f64 (*.f64 g g) (*.f64 h h)))) #s(literal 1 binary64))))
#s(approx (+ g h) (*.f64 h (+.f64 #s(literal 1 binary64) (/.f64 g h))))
#s(approx (- g h) (*.f64 h (-.f64 (/.f64 g h) #s(literal 1 binary64))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h)))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h)) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h)))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 h h)) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g h)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g h)))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))) a))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (pow.f64 h #s(literal 4 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) (pow.f64 h #s(literal 5 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (pow.f64 h #s(literal 4 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64)))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h)))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h)))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (/.f64 g (*.f64 a h)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (/.f64 g (*.f64 a h)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (/.f64 g (*.f64 a h)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g h)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g h))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g h)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h)))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h)))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 h (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (/.f64 g (*.f64 a h)))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 h (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (/.f64 g (*.f64 a h)))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 h (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))) (/.f64 g (*.f64 a 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) h)) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))))))))) h)) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))))))) h)) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 g (*.f64 a h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g a)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (*.f64 (*.f64 h h) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 g a))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 g h)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 g g) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) g) h))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (*.f64 h h) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (sqrt.f64 #s(literal -1 binary64))))) h)) g) h))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 g #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 g (*.f64 a h)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (*.f64 (*.f64 h h) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 g a))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))) a)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64)))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) h) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) h) (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) h) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (pow.f64 h #s(literal 3 binary64))))))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) h) (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64)))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (pow.f64 h #s(literal 3 binary64))))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)) h)) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))) h)) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))) h)) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) h))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) g) h))))))
#s(approx (- (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) g) h))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) h))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) h))))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) h)) #s(literal 1 binary64))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (+.f64 (*.f64 #s(literal -1 binary64) g) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 g g) h)))) h)) #s(literal 1 binary64))))
#s(approx (+ g h) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 g h)) #s(literal 1 binary64)))))
#s(approx (- g h) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 g h))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) h) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) h) (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64)))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) h)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) h)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h)) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 (*.f64 a a) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) g) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))) a)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) (pow.f64 h #s(literal 3 binary64))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))))) h))) (pow.f64 h #s(literal 3 binary64))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h)))) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (pow.f64 h #s(literal 3 binary64))))))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (pow.f64 h #s(literal 3 binary64))))))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) h)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) h)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))) h)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) h)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) h))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h))))))
#s(approx (+ g (sqrt (* (+ g h) (- g h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))) h))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h)))) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (pow.f64 h #s(literal 3 binary64))))))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (pow.f64 h #s(literal 3 binary64))))))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) h)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 g a)) h)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 g a)) h)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) 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))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g)) #s(literal 1/2 binary64)))) a))
#s(approx (cbrt a) (cbrt.f64 a))
#s(approx a a)
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a)))
#s(approx (/ 1 (* 2 a)) (/.f64 #s(literal 1/2 binary64) a))
#s(approx (* 2 a) (*.f64 #s(literal 2 binary64) a))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a)))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal 1/2 binary64)))) a))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal 1/2 binary64)))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal 1/2 binary64))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g))))
#s(approx (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)))
#s(approx (* a a) (*.f64 a a))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal -1/2 binary64))))
#s(approx (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))
#s(approx (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal 1/2 binary64)))) a))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal -1/2 binary64)))) a)))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal -1/2 binary64)))) a))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)))
#s(approx (/ (+ g (sqrt (* (+ g h) (- g h)))) a) (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)))
#s(approx (/ (- (sqrt (* (+ g h) (- g h))) g) a) (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) 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))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 a (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt a) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 a #s(literal -1 binary64)))))
#s(approx (neg (* (cbrt (/ g a)) 1)) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))
#s(approx (* (cbrt (/ g a)) 1) (*.f64 (cbrt.f64 (/.f64 g a)) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
#s(approx (/ (cbrt g) (cbrt a)) (*.f64 (cbrt.f64 (/.f64 g a)) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a) #s(literal 1/2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))))))
#s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64)))))))
#s(approx (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal -1 binary64)))))
#s(approx (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal 1/2 binary64)))))
#s(approx (/ (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (*.f64 (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (*.f64 (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1/2 binary64)))))))
#s(approx (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (*.f64 (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (*.f64 (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1/2 binary64))))))
#s(approx (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (*.f64 (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))))
#s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
#s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (*.f64 (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1/2 binary64)))))
#s(approx (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))

eval242.0ms (2.7%)

Memory
-3.0MiB live, 290.1MiB allocated; 55ms collecting garbage
Compiler

Compiled 143 324 to 9 465 computations (93.4% saved)

prune62.0ms (0.7%)

Memory
-4.0MiB live, 143.2MiB allocated; 11ms collecting garbage
Pruning

27 alts after pruning (25 fresh and 2 done)

PrunedKeptTotal
New1 102131 115
Fresh71219
Picked325
Done000
Total1 112271 139
Accuracy
97.6%
Counts
1 139 → 27
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.5%
(+.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))) #s(literal 1/3 binary64)) (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)))))))
43.6%
(+.f64 (*.f64 (cbrt.f64 (/.f64 #s(literal 1/2 binary64) a)) (cbrt.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) (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)))))))
27.1%
(+.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (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)))))))
45.3%
(+.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)))))) (*.f64 (cbrt.f64 (/.f64 #s(literal 1/2 binary64) a)) (cbrt.f64 (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))
10.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 (pow.f64 (*.f64 g g) #s(literal 3 binary64)) (pow.f64 (*.f64 h h) #s(literal 3 binary64))) (+.f64 (pow.f64 g #s(literal 4 binary64)) (+.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (*.f64 g h) #s(literal 2 binary64))))))))))
66.9%
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
63.2%
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) #s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -2 binary64) g)))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))))
23.4%
(+.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))) (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)))))))
63.2%
(+.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
66.8%
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))))
18.6%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 (+.f64 (*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 #s(approx (* (+ g h) (- g h)) (*.f64 g g))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
11.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))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 #s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g)))) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
32.8%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 #s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))) a))
40.6%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 #s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 a (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))) a))
17.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))))))) (/.f64 #s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))))) a))
40.6%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
36.5%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (pow.f64 (/.f64 g a) #s(literal 1/3 binary64)) #s(literal 1 binary64))))
48.3%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (pow.f64 g #s(literal 1/3 binary64)) (cbrt.f64 a)) #s(literal 1 binary64))))
42.9%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (pow.f64 a #s(literal 1/3 binary64))) #s(literal 1 binary64))))
95.9%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64))))
72.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))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))))
45.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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 (cbrt.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) (cbrt.f64 a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
43.6%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (cbrt.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) (cbrt.f64 a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
23.8%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) #s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 g #s(literal 0 binary64)) a) #s(literal -1/2 binary64)))))))))
21.5%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 4 binary64))) #s(literal -1 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))))) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
40.5%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
35.0%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))))
Compiler

Compiled 3 860 to 2 145 computations (44.4% saved)

series478.0ms (5.4%)

Memory
-27.3MiB live, 552.8MiB allocated; 169ms collecting garbage
Counts
71 → 495
Calls
Call 1
Inputs
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
(cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))
(/.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) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))))
(neg.f64 g)
g
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))
(+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))
#s(literal -1/2 binary64)
(/.f64 (*.f64 h h) g)
(*.f64 h h)
h
(cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))
(/.f64 (neg.f64 g) 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))))))) (neg.f64 (*.f64 (pow.f64 (/.f64 g a) #s(literal 1/3 binary64)) #s(literal 1 binary64))))
(neg.f64 (*.f64 (pow.f64 (/.f64 g a) #s(literal 1/3 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 g a) #s(literal 1/3 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 g a) #s(literal 1/3 binary64))
(/.f64 g a)
#s(literal 1/3 binary64)
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))
(*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))
(cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))
(/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g)))
#s(literal 0 binary64)
(*.f64 a (*.f64 g g))
(*.f64 g g)
(cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g)))
#s(literal -2 binary64)
#s(literal 1/2 binary64)
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64))))
(*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))
(cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g))
(/.f64 (/.f64 (*.f64 h h) a) g)
(/.f64 (*.f64 h h) a)
(cbrt.f64 #s(literal -1/4 binary64))
#s(literal -1/4 binary64)
(cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))
(-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))
#s(approx (sqrt (- (* g g) (* h h))) g)
(+.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (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)))))))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64)))
(*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))
(log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))))
(*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))
(/.f64 #s(literal 1/2 binary64) a)
(+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))
(sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))
(*.f64 (+.f64 g h) (-.f64 g h))
(+.f64 g h)
(-.f64 g 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))))
(sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))
(-.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 (* -1/2 (/ (* h h) g))) #s(hole binary64 (* -1/2 (/ (pow h 2) g))))
#s(approx (+ g (* -1/2 (/ (* h h) g))) #s(hole binary64 (/ (+ (* -1/2 (pow h 2)) (pow g 2)) g)))
#s(approx (* -1/2 (/ (* h h) g)) #s(hole binary64 (* -1/2 (/ (pow h 2) g))))
#s(approx (/ (* h h) g) #s(hole binary64 (/ (pow h 2) g)))
#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) a) #s(hole binary64 (* -1 (/ g a))))
#s(approx (neg (* (pow (/ g a) 1/3) 1)) #s(hole binary64 (* -1 (cbrt (/ g a)))))
#s(approx (* (pow (/ g a) 1/3) 1) #s(hole binary64 (cbrt (/ g a))))
#s(approx (pow (/ g a) 1/3) #s(hole binary64 (cbrt (/ g a))))
#s(approx (/ g a) #s(hole binary64 (/ g a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))))) (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))) (* g (+ (* -1 (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))) (* -1 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))) (* g (+ (* -1 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (* g (+ (* -1 (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))))) (* -1 (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))))))
#s(approx (* g (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2)))) #s(hole binary64 (* (cbrt (/ g a)) (cbrt -1))))
#s(approx (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2))) #s(hole binary64 (* (cbrt (/ 1 (* a (pow g 2)))) (cbrt -1))))
#s(approx (cbrt (* (/ 0 (* a (* g g))) -1/2)) #s(hole binary64 0))
#s(approx (* (/ 0 (* a (* g g))) -1/2) #s(hole binary64 0))
#s(approx (/ 0 (* a (* g g))) #s(hole binary64 0))
#s(approx (* a (* g g)) #s(hole binary64 (* a (pow g 2))))
#s(approx (* g g) #s(hole binary64 (pow g 2)))
#s(approx (cbrt (* (/ -2 (* a (* g g))) 1/2)) #s(hole binary64 (* (cbrt (/ 1 (* a (pow g 2)))) (cbrt -1))))
#s(approx (* (/ -2 (* a (* g g))) 1/2) #s(hole binary64 (/ -1 (* a (pow g 2)))))
#s(approx (/ -2 (* a (* g g))) #s(hole binary64 (/ -2 (* a (pow g 2)))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (cbrt -1/4))))
#s(approx (cbrt (/ (/ (* h h) a) g)) #s(hole binary64 (cbrt (/ (pow h 2) (* a g)))))
#s(approx (/ (/ (* h h) a) g) #s(hole binary64 (/ (pow h 2) (* a g))))
#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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 2))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* 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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 2))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (+ (* 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)))) (/ (- (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))) (pow (cbrt 1/2) 2))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 2))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (+ (* 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)))) (/ (- (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))) (pow (cbrt 1/2) 2)))) (* 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)))) (/ (- (* -1/8 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (/ (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (* (pow h 5) (pow (sqrt -1) 5)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))) (pow (cbrt 1/2) 2)))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 2))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (/ (* g (- (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))) (pow (cbrt 1/2) 2)))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 2))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (/ (* g (- (* -1/8 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (/ (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (* (pow h 5) (pow (sqrt -1) 5)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))))) (pow (cbrt 1/2) 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (/ (- (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))) (pow (cbrt 1/2) 2)))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (log (* 1/2 (/ (* h (sqrt -1)) a))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (log (* 1/2 (/ (* h (sqrt -1)) a)))) (* 1/3 (/ (* a (* g (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* h (sqrt -1)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (log (* 1/2 (/ (* h (sqrt -1)) a)))) (* g (+ (* 1/6 (* g (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)) (* (pow h 2) (pow (sqrt -1) 2)))) (/ 1 (* (pow h 2) (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 4) (pow (sqrt -1) 4))))))) (* 1/3 (/ (* a (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (* h (sqrt -1)))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (log (* 1/2 (/ (* h (sqrt -1)) a)))) (* g (+ (* 1/3 (/ (* a (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (* h (sqrt -1)))) (* g (+ (* 1/18 (* g (+ (* -3 (/ (* a (* (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* -3/2 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* (pow h 4) (pow (sqrt -1) 4)))) (* 2 (/ (* (pow a 3) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3)) (* (pow h 3) (pow (sqrt -1) 3)))))))) (* 1/6 (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)) (* (pow h 2) (pow (sqrt -1) 2)))) (/ 1 (* (pow h 2) (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 4) (pow (sqrt -1) 4)))))))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (log (* 1/2 (/ (* h (sqrt -1)) a)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (* h (sqrt -1)) a))) (/ (* a (* g (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* h (sqrt -1))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (* h (sqrt -1)) a))) (* g (+ (* 1/2 (* g (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)) (* (pow h 2) (pow (sqrt -1) 2)))) (/ 1 (* (pow h 2) (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 4) (pow (sqrt -1) 4))))))) (/ (* a (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (* h (sqrt -1))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (* h (sqrt -1)) a))) (* g (+ (* g (+ (* 1/6 (* g (+ (* -3 (/ (* a (* (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* -3/2 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* (pow h 4) (pow (sqrt -1) 4)))) (* 2 (/ (* (pow a 3) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3)) (* (pow h 3) (pow (sqrt -1) 3)))))))) (* 1/2 (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)) (* (pow h 2) (pow (sqrt -1) 2)))) (/ 1 (* (pow h 2) (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 4) (pow (sqrt -1) 4)))))))) (/ (* a (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (* h (sqrt -1))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* 1/2 (/ (* h (sqrt -1)) a))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (+ (* 1/2 (* g (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* 1/2 (/ (* h (sqrt -1)) a)))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (+ (* 1/2 (/ (* h (sqrt -1)) a)) (* g (+ (* 1/4 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* h (sqrt -1))))) (* 1/2 (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (+ (* 1/2 (/ (* h (sqrt -1)) a)) (* g (+ (* 1/2 (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (* g (+ (* -1/8 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (sqrt -1))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (+ (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)) (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 1)) (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))) 1)) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* 1/2 (/ (* g (+ h (* -1 h))) (* h (sqrt -1)))) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))))))) (* h (sqrt -1)))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* -1 (pow h 2))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* -1 (pow h 2)) (* g (+ h (* -1 h))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* -1 (pow h 2)) (* g (+ g (+ h (* -1 h)))))))
#s(approx (+ g h) #s(hole binary64 h))
#s(approx (+ g h) #s(hole binary64 (+ g h)))
#s(approx (- g h) #s(hole binary64 (* -1 h)))
#s(approx (- g h) #s(hole binary64 (- g h)))
#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 (+ (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 (* -1/2 (/ (* h h) g))) #s(hole binary64 g))
#s(approx (+ g (* -1/2 (/ (* h h) g))) #s(hole binary64 (* g (+ 1 (* -1/2 (/ (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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* -1 (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))) (* -1 (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* -1 (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))) (+ (* -1 (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* -1 (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))) (+ (* -1 (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g))) (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))))) (pow (cbrt 1/2) 2))))) (pow g 3))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/2) 2))))))))))))
#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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (/ (+ h (* -1 h)) a)) (/ (cbrt 1/4) g))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* g (+ (* 1/12 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/4) 2)))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (cbrt 1/4) g)))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* g (+ (* 1/12 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/4) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/48 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/4))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (pow (cbrt 1/4) 2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (cbrt 1/4) g))))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/4))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (* 1/12 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/4) 2)))))) (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/4)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (* 1/12 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/4) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/48 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/4))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (pow (cbrt 1/4) 2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/4))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (* 1/12 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/4) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/4 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) a)) (+ (* 1/1728 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/4) 2)))) (* 1/6 (* (pow (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 5))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/4) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/48 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/4))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))))))))) (* (pow g 3) (pow (cbrt 1/4) 2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/48 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/4))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (pow (cbrt 1/4) 2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/4)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (log (* 1/4 (/ (+ h (* -1 h)) a))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (log (* 1/4 (/ (+ h (* -1 h)) a)))) (* 1/3 (/ (- (* -1 (/ (pow h 2) (+ h (* -1 h)))) (* 1/4 (+ h (* -1 h)))) g)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/6 (/ (+ (* -1 (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* -1 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2) (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/3 (log (* 1/4 (/ (+ h (* -1 h)) a)))) (* 1/3 (/ (- (* -1 (/ (pow h 2) (+ h (* -1 h)))) (* 1/4 (+ h (* -1 h)))) g))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/18 (/ (+ (* -6 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (+ h (* -1 h)))) (+ (* 2 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (+ h (* -1 h)) 3))) (* 3 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2) (+ h (* -1 h)))))) (pow g 3))) (+ (* 1/6 (/ (+ (* -1 (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* -1 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2) (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/3 (log (* 1/4 (/ (+ h (* -1 h)) a)))) (* 1/3 (/ (- (* -1 (/ (pow h 2) (+ h (* -1 h)))) (* 1/4 (+ h (* -1 h)))) g)))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (log (* 1/4 (/ (+ h (* -1 h)) a)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (- (+ (log (* 1/4 (/ (+ h (* -1 h)) a))) (* -1 (/ (pow h 2) (* g (+ h (* -1 h)))))) (* 1/4 (/ (+ h (* -1 h)) g)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (- (+ (log (* 1/4 (/ (+ h (* -1 h)) a))) (+ (* -1 (/ (pow h 2) (* g (+ h (* -1 h))))) (* 1/2 (/ (+ (* -1 (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* -1 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2) (pow (+ h (* -1 h)) 2)))) (pow g 2))))) (* 1/4 (/ (+ h (* -1 h)) g)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (- (+ (log (* 1/4 (/ (+ h (* -1 h)) a))) (+ (* -1 (/ (pow h 2) (* g (+ h (* -1 h))))) (+ (* 1/6 (/ (+ (* -6 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (+ h (* -1 h)))) (+ (* 2 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (+ h (* -1 h)) 3))) (* 3 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2) (+ h (* -1 h)))))) (pow g 3))) (* 1/2 (/ (+ (* -1 (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* -1 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2) (pow (+ h (* -1 h)) 2)))) (pow g 2)))))) (* 1/4 (/ (+ h (* -1 h)) g)))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* 1/4 (/ (+ h (* -1 h)) a))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (+ (* 1/4 (/ (+ h (* -1 h)) a)) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (+ (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 2)))) (+ (* 1/4 (/ (+ h (* -1 h)) a)) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (+ (* -1/4 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (* a (pow g 3)))) (+ (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 2)))) (+ (* 1/4 (/ (+ h (* -1 h)) a)) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* 1/2 (+ h (* -1 h)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (pow g 3))) (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 g))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (pow g 2)))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (+ (* -1 (/ h g)) (/ h g))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (+ (* -1 (/ h g)) (+ (* -1 (/ (pow h 2) (pow g 2))) (/ h g)))))))
#s(approx (+ g h) #s(hole binary64 g))
#s(approx (+ g h) #s(hole binary64 (* g (+ 1 (/ h g)))))
#s(approx (- g h) #s(hole binary64 g))
#s(approx (- g h) #s(hole binary64 (* g (+ 1 (* -1 (/ h g))))))
#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)))))) (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 (+ g (* -1/2 (/ (* h h) g))) #s(hole binary64 (* -1 (* g (- (* 1/2 (/ (pow h 2) (pow g 2))) 1)))))
#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 (* (pow (/ g a) 1/3) 1)) #s(hole binary64 (* (cbrt (/ g a)) (cbrt -1))))
#s(approx (* (pow (/ g a) 1/3) 1) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#s(approx (pow (/ g a) 1/3) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* g (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))) a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (- (pow (sqrt -1) 2) 1) 2))))) (* (cbrt 1/2) (+ h (* -1 h)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))))) (+ (* 1/6 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) (pow g 3))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) (+ (* -1/12 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))))) g))) (pow g 3))))))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (* (pow (cbrt -1) 2) (cbrt -1/4)))))
#s(approx (cbrt (/ (/ (* h h) a) g)) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (pow (cbrt -1) 2))))
#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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* (cbrt (/ (* g (+ 1 (pow (sqrt -1) 2))) a)) (cbrt 1/2)))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ 1 (* a (* (pow g 2) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (/ (+ h (* -1 h)) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (pow (cbrt 1/2) 2)))) g)) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/24 (* (cbrt (/ (* (pow g 2) (pow h 8)) a)) (/ 1 (cbrt 1/2)))) (* 1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2))))) (pow g 3))) (+ (* 1/12 (* (cbrt (/ 1 (* a (* (pow g 2) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (/ (+ h (* -1 h)) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (pow (cbrt 1/2) 2))))) g)) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* (cbrt (/ (* g (+ 1 (pow (sqrt -1) 2))) a)) (cbrt 1/2)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* g (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (/ (+ h (* -1 h)) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (* 1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (+ h (* -1 h)) (pow (cbrt 1/2) 2))))) (pow g 3))) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/24 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* (pow (cbrt 1/2) 2) (pow (sqrt -1) 2))))) (* 1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2))))) g)) (* 1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (+ h (* -1 h)) (pow (cbrt 1/2) 2))))) (pow g 3))) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (* -1 (log (/ -1 g)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1/6 (/ (+ h (* -1 h)) (* g (+ 1 (pow (sqrt -1) 2))))) (* 1/3 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (* -1 (log (/ -1 g))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1 (/ (+ (* -1/6 (/ (- (+ (* -1/4 (/ (pow (+ h (* -1 h)) 2) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (pow h 2) (+ 1 (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow (sqrt -1) 2) (+ 1 (pow (sqrt -1) 2)))))) g)) (* 1/6 (/ (+ h (* -1 h)) (+ 1 (pow (sqrt -1) 2))))) g)) (* 1/3 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (* -1 (log (/ -1 g))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/18 (/ (+ (* -3/2 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* (pow (sqrt -1) 2) (+ 1 (pow (sqrt -1) 2))))) (+ (* -3/2 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* 1/4 (/ (pow (+ h (* -1 h)) 3) (pow (+ 1 (pow (sqrt -1) 2)) 3))))) g)) (* 1/6 (- (+ (* -1/4 (/ (pow (+ h (* -1 h)) 2) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (pow h 2) (+ 1 (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow (sqrt -1) 2) (+ 1 (pow (sqrt -1) 2)))))))) g)) (* 1/6 (/ (+ h (* -1 h)) (+ 1 (pow (sqrt -1) 2))))) g)) (* 1/3 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (* -1 (log (/ -1 g))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (* -1 (log (/ -1 g))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (+ (* -1 (log (/ -1 g))) (* -1/2 (/ (+ h (* -1 h)) (* g (+ 1 (pow (sqrt -1) 2)))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (+ (* -1 (log (/ -1 g))) (* -1 (/ (+ (* -1/2 (/ (- (+ (* -1/4 (/ (pow (+ h (* -1 h)) 2) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (pow h 2) (+ 1 (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow (sqrt -1) 2) (+ 1 (pow (sqrt -1) 2)))))) g)) (* 1/2 (/ (+ h (* -1 h)) (+ 1 (pow (sqrt -1) 2))))) g))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (+ (* -1 (log (/ -1 g))) (* -1 (/ (+ (* -1 (/ (+ (* -1/6 (/ (+ (* -3/2 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* (pow (sqrt -1) 2) (+ 1 (pow (sqrt -1) 2))))) (+ (* -3/2 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* 1/4 (/ (pow (+ h (* -1 h)) 3) (pow (+ 1 (pow (sqrt -1) 2)) 3))))) g)) (* 1/2 (- (+ (* -1/4 (/ (pow (+ h (* -1 h)) 2) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (pow h 2) (+ 1 (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow (sqrt -1) 2) (+ 1 (pow (sqrt -1) 2)))))))) g)) (* 1/2 (/ (+ h (* -1 h)) (+ 1 (pow (sqrt -1) 2))))) g))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1/2 (/ (* g (+ 1 (pow (sqrt -1) 2))) a))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1 (* g (+ (* -1/4 (/ (+ h (* -1 h)) (* a g))) (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/4 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) (* a g))) (* 1/4 (/ (+ h (* -1 h)) a))) g)) (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* a (* g (pow (sqrt -1) 2))))) (* 1/4 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) a))) g)) (* 1/4 (/ (+ h (* -1 h)) a))) g)) (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* g (+ 1 (pow (sqrt -1) 2))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (pow (sqrt -1) 2)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (* -1 (/ (+ (* -1 (+ h (* -1 h))) (/ (pow h 2) g)) g))))))
#s(approx (+ g h) #s(hole binary64 (* -1 (* g (- (* -1 (/ h g)) 1)))))
#s(approx (- g h) #s(hole binary64 (* -1 (* g (- (/ h g) 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))) (* (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 (* -1/2 (/ (* h h) g))) #s(hole binary64 (+ g (* -1/2 (/ (pow h 2) g)))))
#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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* a (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* h (* (cbrt 1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))) (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))) (* h (+ (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* -1 (* h (+ (* 1/12 (* (/ (* (cbrt -1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3)))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow g 11)))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow g 14))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2))))))) (* -1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))))))))))
#s(approx (/ (* h h) a) #s(hole binary64 (/ (pow h 2) a)))
#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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (+ (* -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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (+ (* (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)))) (* 1/24 (* (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2)))))))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (+ (* (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)))) (* h (+ (* 1/24 (* (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* h (+ (* -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/12 (* (/ (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2)))))))))))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (* 1/24 (* (/ (* (pow h 3) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (* (pow h 3) (+ (* -1/12 (* (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/24 (* (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (* (pow h 3) (+ (* 1/24 (* (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* h (+ (* -1/12 (* (/ (* h (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* -1/12 (* (/ (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log h) (log (* 1/4 (/ (+ g (* -1 g)) (* a g))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1/3 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (+ g (* -1 g)))) (* 1/3 (+ (log h) (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (+ (log h) (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))))) (* h (+ (* -1/3 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* 1/6 (* h (+ (* -1 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow (+ g (* -1 g)) 2))) (+ (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (/ 1 (pow g 2)))))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (+ (log h) (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))))) (* h (+ (* -1/3 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* h (+ (* 1/18 (* h (+ (* -6 (/ (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))) (+ g (* -1 g)))) (+ (* -2 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 3) (pow (+ g (* -1 g)) 3))) (* 3 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (* (pow g 2) (+ g (* -1 g))))))))) (* 1/6 (+ (* -1 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow (+ g (* -1 g)) 2))) (+ (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (/ 1 (pow g 2))))))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log h) (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log h) (+ (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))) (* -1 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (+ g (* -1 g))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log h) (+ (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))) (* h (+ (* -1 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* 1/2 (* h (+ (* -1 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow (+ g (* -1 g)) 2))) (+ (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (/ 1 (pow g 2))))))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log h) (+ (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))) (* h (+ (* -1 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* h (+ (* 1/6 (* h (+ (* -6 (/ (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))) (+ g (* -1 g)))) (+ (* -2 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 3) (pow (+ g (* -1 g)) 3))) (* 3 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (* (pow g 2) (+ g (* -1 g))))))))) (* 1/2 (+ (* -1 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow (+ g (* -1 g)) 2))) (+ (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (/ 1 (pow g 2)))))))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* h (+ (* -1/4 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (+ g (* -1 g)) (* a g)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* h (+ (* 1/4 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/4 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/8 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* h (+ (* 1/4 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/4 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* h (+ (* -1/4 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g))) (* 1/8 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))))))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* 1/2 (/ (* h (+ g (* -1 g))) g))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* h (+ (* -1/2 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) g)) (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (pow g 3)))))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* 1/2 (/ (* h (+ g (* -1 g))) g)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* h (+ g (* -1 g))) (pow g 2))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* h (+ g (+ (* -1 g) (* -1 h)))) (pow g 2))))
#s(approx (- g h) #s(hole binary64 (+ g (* -1 h))))
#s(approx (- (* g g) (* h h)) #s(hole binary64 (+ (* -1 (pow h 2)) (pow g 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 (+ (* (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 (* -1/2 (/ (* h h) g))) #s(hole binary64 (* (pow h 2) (- (/ g (pow h 2)) (* 1/2 (/ 1 g))))))
#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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #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 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (pow h 4))) (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) (pow h 5))) (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (pow h 4))) (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* h (+ (* 1/12 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* h (+ (* -1/24 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (cbrt 1/2) 2)))) (+ (* 1/12 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 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 (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* h (+ (* 1/12 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* h (+ (* -1/24 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (cbrt 1/2) 2)))) (+ (* 1/12 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ 1 h)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ 1 h))))) (* 1/3 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/6 (/ (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))) (pow h 2))) (+ (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ 1 h))))) (* 1/3 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/18 (/ (+ (* -3 (/ (* a (* (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 3))) (+ (* -3/2 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 4))) (* 2 (/ (* (pow a 3) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 3)) (pow (sqrt -1) 3))))) (pow h 3))) (+ (* 1/6 (/ (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))) (pow h 2))) (+ (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ 1 h))))) (* 1/3 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1)))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ 1 h))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (+ (* -1 (log (/ 1 h))) (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1)))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (+ (* -1 (log (/ 1 h))) (+ (* 1/2 (/ (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))) (pow h 2))) (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (+ (* -1 (log (/ 1 h))) (+ (* 1/6 (/ (+ (* -3 (/ (* a (* (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 3))) (+ (* -3/2 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 4))) (* 2 (/ (* (pow a 3) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 3)) (pow (sqrt -1) 3))))) (pow h 3))) (+ (* 1/2 (/ (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))) (pow h 2))) (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1)))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* h (+ (* 1/2 (/ (sqrt -1) a)) (* 1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* h (+ (* 1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (+ (* 1/2 (/ (sqrt -1) a)) (* 1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* h (+ (* -1/8 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (+ (* 1/2 (/ (sqrt -1) a)) (* 1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (- (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))) (/ g h)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))) (/ g h)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))) (/ g h)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (+ (* -1 (/ g h)) (/ g h)) 1))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (+ (* -1 (/ g h)) (+ (/ g h) (/ (pow g 2) (pow h 2)))) 1))))
#s(approx (+ g h) #s(hole binary64 (* h (+ 1 (/ g h)))))
#s(approx (- g h) #s(hole binary64 (* h (- (/ g h) 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)))))) (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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #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 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))) (+ (* 1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) (pow h 3))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) (+ (* -1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))))) h))) (pow h 3))))))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) #s(hole binary64 (* -1 (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (cbrt -1/4))))))
#s(approx (cbrt (/ (/ (* h h) a) g)) #s(hole binary64 (* -1 (* (cbrt (/ (pow h 2) (* a g))) (cbrt -1)))))
#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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt -1/2))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/24 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (cbrt 1/2) 2)))) (+ (* 1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt -1/2)))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 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 (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* h (+ (* -1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 2))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/24 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (cbrt 1/2) 2)))) (* 1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2))))) h)) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 2))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ -1 h)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1/3 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1)))) (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ -1 h))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1 (/ (+ (* -1/6 (/ (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))) h)) (* 1/3 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (sqrt -1)))) h)) (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ -1 h))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/18 (/ (+ (* -3 (/ (* a (* (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 3))) (+ (* -3/2 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 4))) (* 2 (/ (* (pow a 3) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 3)) (pow (sqrt -1) 3))))) h)) (* 1/6 (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))))) h)) (* 1/3 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (sqrt -1)))) h)) (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ -1 h))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ -1 h))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (+ (* -1 (log (/ -1 h))) (* -1 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (+ (* -1 (log (/ -1 h))) (* -1 (/ (+ (* -1/2 (/ (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))) h)) (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (sqrt -1))) h))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (+ (* -1 (log (/ -1 h))) (* -1 (/ (+ (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (/ (* a (* (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 3))) (+ (* -3/2 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 4))) (* 2 (/ (* (pow a 3) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 3)) (pow (sqrt -1) 3))))) h)) (* 1/2 (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))))) h)) (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (sqrt -1))) h))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1/2 (/ (* h (sqrt -1)) a))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1 (* h (+ (* -1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* h (sqrt -1))))) (* 1/2 (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* h (pow (sqrt -1) 3))))) (* 1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (sqrt -1))))) h)) (* 1/2 (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (* -1 (/ (+ g (* -1 g)) h)) 1))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (* -1 (/ (+ g (+ (* -1 g) (* -1 (/ (pow g 2) h)))) h)) 1))))
#s(approx (+ g h) #s(hole binary64 (* -1 (* h (- (* -1 (/ g h)) 1)))))
#s(approx (- g h) #s(hole binary64 (* -1 (* h (+ 1 (* -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 (/ (+ (* (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2))) a)))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt 1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt -1/2))) a))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (* (+ g h) (- g h))) g))) (cbrt 1/2))) a)))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log (* 1/2 (- (sqrt (* (+ g h) (- g h))) g))) (* -1 (log a))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (- (sqrt (* (+ g h) (- g h))) g))) (* -1 (log a)))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* 1/2 (/ (- (sqrt (* (+ g h) (- g h))) g) a))))
#s(approx (/ 1/2 a) #s(hole binary64 (/ 1/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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2)))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (* (+ g h) (- g h))) g) a)) (cbrt 1/2)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log (* 1/2 (- (sqrt (* (+ g h) (- g h))) g))) (log (/ 1 a))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (- (sqrt (* (+ g h) (- g h))) g))) (log (/ 1 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) (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)))))
#s(approx (neg (* (pow (/ g a) 1/3) 1)) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (pow (cbrt -1) 2)))))
#s(approx (* (pow (/ g a) 1/3) 1) #s(hole binary64 (* (cbrt (/ g a)) (pow (cbrt -1) 2))))
#s(approx (pow (/ g a) 1/3) #s(hole binary64 (* (cbrt (/ g a)) (pow (cbrt -1) 2))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (cbrt -1) (cbrt -1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt 1/2)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (pow (cbrt -1) 2) (cbrt 1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (pow (cbrt -1) 2) (cbrt -1/2)))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt -1/2))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt -1/2)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log (* -1/2 (- (sqrt (* (+ g h) (- g h))) g))) (log (/ -1 a))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* -1/2 (- (sqrt (* (+ g h) (- g h))) g))) (log (/ -1 a)))))
Calls

9 calls:

TimeVariablePointExpression
170.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 (* -1/2 (/ (* h h) g))) (* -1/2 (/ (* h h) g)) -1/2 (/ (* h h) 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) a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg (* (pow (/ g a) 1/3) 1)) (* (pow (/ g a) 1/3) 1) (pow (/ g a) 1/3) (/ g a) 1/3 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (* g (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2)))) (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2))) (cbrt (* (/ 0 (* a (* g g))) -1/2)) (* (/ 0 (* a (* g g))) -1/2) (/ 0 (* a (* g g))) 0 (* a (* g g)) (* g g) (cbrt (* (/ -2 (* a (* g g))) 1/2)) (* (/ -2 (* a (* g g))) 1/2) (/ -2 (* a (* g g))) -2 1/2 (+ (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)))))) (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (cbrt (/ (/ (* h h) a) g)) (/ (/ (* h h) a) g) (/ (* h h) a) (cbrt -1/4) -1/4 (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)))) (sqrt (- (* g g) (* h h))) (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g 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)))) (sqrt (- (* g g) (* h h))) (- (* g g) (* h h)))
74.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 (* -1/2 (/ (* h h) g))) (* -1/2 (/ (* h h) g)) -1/2 (/ (* h h) 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) a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg (* (pow (/ g a) 1/3) 1)) (* (pow (/ g a) 1/3) 1) (pow (/ g a) 1/3) (/ g a) 1/3 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (* g (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2)))) (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2))) (cbrt (* (/ 0 (* a (* g g))) -1/2)) (* (/ 0 (* a (* g g))) -1/2) (/ 0 (* a (* g g))) 0 (* a (* g g)) (* g g) (cbrt (* (/ -2 (* a (* g g))) 1/2)) (* (/ -2 (* a (* g g))) 1/2) (/ -2 (* a (* g g))) -2 1/2 (+ (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)))))) (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (cbrt (/ (/ (* h h) a) g)) (/ (/ (* h h) a) g) (/ (* h h) a) (cbrt -1/4) -1/4 (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)))) (sqrt (- (* g g) (* h h))) (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g 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)))) (sqrt (- (* g g) (* h h))) (- (* g g) (* h h)))
52.0ms
a
@-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 (* -1/2 (/ (* h h) g))) (* -1/2 (/ (* h h) g)) -1/2 (/ (* h h) 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) a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg (* (pow (/ g a) 1/3) 1)) (* (pow (/ g a) 1/3) 1) (pow (/ g a) 1/3) (/ g a) 1/3 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (* g (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2)))) (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2))) (cbrt (* (/ 0 (* a (* g g))) -1/2)) (* (/ 0 (* a (* g g))) -1/2) (/ 0 (* a (* g g))) 0 (* a (* g g)) (* g g) (cbrt (* (/ -2 (* a (* g g))) 1/2)) (* (/ -2 (* a (* g g))) 1/2) (/ -2 (* a (* g g))) -2 1/2 (+ (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)))))) (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (cbrt (/ (/ (* h h) a) g)) (/ (/ (* h h) a) g) (/ (* h h) a) (cbrt -1/4) -1/4 (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)))) (sqrt (- (* g g) (* h h))) (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g 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)))) (sqrt (- (* g g) (* h h))) (- (* g g) (* h h)))
38.0ms
a
@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 (* -1/2 (/ (* h h) g))) (* -1/2 (/ (* h h) g)) -1/2 (/ (* h h) 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) a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg (* (pow (/ g a) 1/3) 1)) (* (pow (/ g a) 1/3) 1) (pow (/ g a) 1/3) (/ g a) 1/3 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (* g (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2)))) (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2))) (cbrt (* (/ 0 (* a (* g g))) -1/2)) (* (/ 0 (* a (* g g))) -1/2) (/ 0 (* a (* g g))) 0 (* a (* g g)) (* g g) (cbrt (* (/ -2 (* a (* g g))) 1/2)) (* (/ -2 (* a (* g g))) 1/2) (/ -2 (* a (* g g))) -2 1/2 (+ (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)))))) (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (cbrt (/ (/ (* h h) a) g)) (/ (/ (* h h) a) g) (/ (* h h) a) (cbrt -1/4) -1/4 (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)))) (sqrt (- (* g g) (* h h))) (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g 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)))) (sqrt (- (* g g) (* h h))) (- (* g g) (* h h)))
37.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 (* -1/2 (/ (* h h) g))) (* -1/2 (/ (* h h) g)) -1/2 (/ (* h h) 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) a) (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg (* (pow (/ g a) 1/3) 1)) (* (pow (/ g a) 1/3) 1) (pow (/ g a) 1/3) (/ g a) 1/3 (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (* g (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2)))) (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2))) (cbrt (* (/ 0 (* a (* g g))) -1/2)) (* (/ 0 (* a (* g g))) -1/2) (/ 0 (* a (* g g))) 0 (* a (* g g)) (* g g) (cbrt (* (/ -2 (* a (* g g))) 1/2)) (* (/ -2 (* a (* g g))) 1/2) (/ -2 (* a (* g g))) -2 1/2 (+ (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)))))) (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (cbrt (/ (/ (* h h) a) g)) (/ (/ (* h h) a) g) (/ (* h h) a) (cbrt -1/4) -1/4 (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)))) (sqrt (- (* g g) (* h h))) (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)) (sqrt (* (+ g h) (- g h))) (* (+ g h) (- g h)) (+ g h) (- g 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)))) (sqrt (- (* g g) (* h h))) (- (* g g) (* h h)))

rewrite370.0ms (4.2%)

Memory
33.5MiB live, 549.2MiB allocated; 77ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03555154618854693
0364538176
01098037854
Stop Event
iter limit
node limit
iter limit
Counts
566 → 620
Calls
Call 1
Inputs
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
(cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))
(/.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) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))))
(neg.f64 g)
g
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))
(+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))
#s(literal -1/2 binary64)
(/.f64 (*.f64 h h) g)
(*.f64 h h)
h
(cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))
(/.f64 (neg.f64 g) 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))))))) (neg.f64 (*.f64 (pow.f64 (/.f64 g a) #s(literal 1/3 binary64)) #s(literal 1 binary64))))
(neg.f64 (*.f64 (pow.f64 (/.f64 g a) #s(literal 1/3 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 g a) #s(literal 1/3 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 g a) #s(literal 1/3 binary64))
(/.f64 g a)
#s(literal 1/3 binary64)
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))
(*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))
(cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))
(/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g)))
#s(literal 0 binary64)
(*.f64 a (*.f64 g g))
(*.f64 g g)
(cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g)))
#s(literal -2 binary64)
#s(literal 1/2 binary64)
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64))))
(*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))
(cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g))
(/.f64 (/.f64 (*.f64 h h) a) g)
(/.f64 (*.f64 h h) a)
(cbrt.f64 #s(literal -1/4 binary64))
#s(literal -1/4 binary64)
(cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))
(-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))
#s(approx (sqrt (- (* g g) (* h h))) g)
(+.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (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)))))))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64)))
(*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))
(log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))))
(*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))
(/.f64 #s(literal 1/2 binary64) a)
(+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))
(sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))
(*.f64 (+.f64 g h) (-.f64 g h))
(+.f64 g h)
(-.f64 g 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))))
(sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))
(-.f64 (*.f64 g g) (*.f64 h 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 (+ (* (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 (* -1/2 (/ (* h h) g))) #s(hole binary64 (* -1/2 (/ (pow h 2) g))))
#s(approx (+ g (* -1/2 (/ (* h h) g))) #s(hole binary64 (/ (+ (* -1/2 (pow h 2)) (pow g 2)) g)))
#s(approx (* -1/2 (/ (* h h) g)) #s(hole binary64 (* -1/2 (/ (pow h 2) g))))
#s(approx (/ (* h h) g) #s(hole binary64 (/ (pow h 2) g)))
#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) a) #s(hole binary64 (* -1 (/ g a))))
#s(approx (neg (* (pow (/ g a) 1/3) 1)) #s(hole binary64 (* -1 (cbrt (/ g a)))))
#s(approx (* (pow (/ g a) 1/3) 1) #s(hole binary64 (cbrt (/ g a))))
#s(approx (pow (/ g a) 1/3) #s(hole binary64 (cbrt (/ g a))))
#s(approx (/ g a) #s(hole binary64 (/ g a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (* h (sqrt -1)))) (cbrt 1/2))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))))) (+ (* 1/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))))) (* g (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (+ 1 (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 2)))))))))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* -1/4 (/ (* (pow a 2) (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/27 (* (cbrt (/ (pow a 14) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 8)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (* (pow a 2) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/3 (* (pow (/ (* 1 (pow a 34)) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (* g (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))))))) (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))) (* g (+ (* -1 (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))) (* -1 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))) (* g (+ (* -1 (+ (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt -1/2) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))) (* 1/3 (* (pow (/ (* 1 (pow a 2)) (* (pow h 2) (pow (sqrt -1) 2))) 1/9) (* (cbrt 1/2) (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))) (* g (+ (* -1 (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)))))))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/27 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3))) (* 2/3 (* (pow (/ (* 1 (pow a 5)) (* (pow h 5) (pow (sqrt -1) 5))) 1/9) (* (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))))) (* -1 (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/3 (* (pow (/ (* 1 a) (* h (sqrt -1))) 1/9) (pow (+ (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2))))))))))))))))
#s(approx (* g (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2)))) #s(hole binary64 (* (cbrt (/ g a)) (cbrt -1))))
#s(approx (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2))) #s(hole binary64 (* (cbrt (/ 1 (* a (pow g 2)))) (cbrt -1))))
#s(approx (cbrt (* (/ 0 (* a (* g g))) -1/2)) #s(hole binary64 0))
#s(approx (* (/ 0 (* a (* g g))) -1/2) #s(hole binary64 0))
#s(approx (/ 0 (* a (* g g))) #s(hole binary64 0))
#s(approx (* a (* g g)) #s(hole binary64 (* a (pow g 2))))
#s(approx (* g g) #s(hole binary64 (pow g 2)))
#s(approx (cbrt (* (/ -2 (* a (* g g))) 1/2)) #s(hole binary64 (* (cbrt (/ 1 (* a (pow g 2)))) (cbrt -1))))
#s(approx (* (/ -2 (* a (* g g))) 1/2) #s(hole binary64 (/ -1 (* a (pow g 2)))))
#s(approx (/ -2 (* a (* g g))) #s(hole binary64 (/ -2 (* a (pow g 2)))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (cbrt -1/4))))
#s(approx (cbrt (/ (/ (* h h) a) g)) #s(hole binary64 (cbrt (/ (pow h 2) (* a g)))))
#s(approx (/ (/ (* h h) a) g) #s(hole binary64 (/ (pow h 2) (* a g))))
#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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 2))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* 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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 2))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (+ (* 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)))) (/ (- (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))) (pow (cbrt 1/2) 2))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 2))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (+ (* 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)))) (/ (- (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))) (pow (cbrt 1/2) 2)))) (* 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)))) (/ (- (* -1/8 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (/ (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (* (pow h 5) (pow (sqrt -1) 5)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1))))))) (pow (cbrt 1/2) 2)))))))))))) (+ (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt -1/2)) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 2))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (/ (* g (- (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2)))))) (pow (cbrt 1/2) 2)))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (* g (+ (* 1/6 (* (pow (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 2))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))) (* g (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (/ (* g (- (* -1/8 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (* (pow h 2) (pow (sqrt -1) 2))))) (/ (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 3) (pow (cbrt 1/2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (* (pow h 5) (pow (sqrt -1) 5)))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/2) 5))) (* (- (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))) (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)))))))) (pow (cbrt 1/2) 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 2) (pow (sqrt -1) 2)))) (/ (- (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (* h (sqrt -1)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1) 2))))) (pow (cbrt 1/2) 2)))))))) (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (log (* 1/2 (/ (* h (sqrt -1)) a))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (log (* 1/2 (/ (* h (sqrt -1)) a)))) (* 1/3 (/ (* a (* g (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* h (sqrt -1)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (log (* 1/2 (/ (* h (sqrt -1)) a)))) (* g (+ (* 1/6 (* g (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)) (* (pow h 2) (pow (sqrt -1) 2)))) (/ 1 (* (pow h 2) (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 4) (pow (sqrt -1) 4))))))) (* 1/3 (/ (* a (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (* h (sqrt -1)))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (log (* 1/2 (/ (* h (sqrt -1)) a)))) (* g (+ (* 1/3 (/ (* a (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (* h (sqrt -1)))) (* g (+ (* 1/18 (* g (+ (* -3 (/ (* a (* (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* -3/2 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* (pow h 4) (pow (sqrt -1) 4)))) (* 2 (/ (* (pow a 3) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3)) (* (pow h 3) (pow (sqrt -1) 3)))))))) (* 1/6 (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)) (* (pow h 2) (pow (sqrt -1) 2)))) (/ 1 (* (pow h 2) (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 4) (pow (sqrt -1) 4)))))))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (log (* 1/2 (/ (* h (sqrt -1)) a)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (* h (sqrt -1)) a))) (/ (* a (* g (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* h (sqrt -1))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (* h (sqrt -1)) a))) (* g (+ (* 1/2 (* g (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)) (* (pow h 2) (pow (sqrt -1) 2)))) (/ 1 (* (pow h 2) (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 4) (pow (sqrt -1) 4))))))) (/ (* a (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (* h (sqrt -1))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (* h (sqrt -1)) a))) (* g (+ (* g (+ (* 1/6 (* g (+ (* -3 (/ (* a (* (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* -3/2 (/ (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* (pow h 4) (pow (sqrt -1) 4)))) (* 2 (/ (* (pow a 3) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 3)) (* (pow h 3) (pow (sqrt -1) 3)))))))) (* 1/2 (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)) 2)) (* (pow h 2) (pow (sqrt -1) 2)))) (/ 1 (* (pow h 2) (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 4) (pow (sqrt -1) 4)))))))) (/ (* a (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (* h (sqrt -1))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* 1/2 (/ (* h (sqrt -1)) a))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (+ (* 1/2 (* g (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a)))) (* 1/2 (/ (* h (sqrt -1)) a)))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (+ (* 1/2 (/ (* h (sqrt -1)) a)) (* g (+ (* 1/4 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* a (* h (sqrt -1))))) (* 1/2 (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (+ (* 1/2 (/ (* h (sqrt -1)) a)) (* g (+ (* 1/2 (- (* 1/2 (/ (+ h (* -1 h)) (* a (* h (sqrt -1))))) (/ 1 a))) (* g (+ (* -1/8 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (* 1/4 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* a (* h (sqrt -1))))))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (sqrt -1))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (+ (* g (- (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) 1)) (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1))))) 1)) (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (+ (* g (- (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1))))))) 1)) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (sqrt -1))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* 1/2 (/ (* g (+ h (* -1 h))) (* h (sqrt -1)))) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (* g (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2)))))) (* h (sqrt -1)))) (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))))) (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ (* g (+ (* 1/2 (/ (+ h (* -1 h)) (* h (sqrt -1)))) (* g (+ (* -1/4 (/ (* g (* (+ h (* -1 h)) (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))))) (* (pow h 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow h 2) (pow (sqrt -1) 2))))) (* h (sqrt -1)))))))) (* h (sqrt -1)))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* -1 (pow h 2))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* -1 (pow h 2)) (* g (+ h (* -1 h))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* -1 (pow h 2)) (* g (+ g (+ h (* -1 h)))))))
#s(approx (+ g h) #s(hole binary64 h))
#s(approx (+ g h) #s(hole binary64 (+ g h)))
#s(approx (- g h) #s(hole binary64 (* -1 h)))
#s(approx (- g h) #s(hole binary64 (- g h)))
#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 (+ (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 (* -1/2 (/ (* h h) g))) #s(hole binary64 g))
#s(approx (+ g (* -1/2 (/ (* h h) g))) #s(hole binary64 (* g (+ 1 (* -1/2 (/ (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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* g (+ (* 1/6 (* (cbrt (/ 1 (* a (pow g 5)))) (/ (* (cbrt -1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow (+ h (* -1 h)) 2)) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (cbrt 1/2))))) (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (- (* -1/4 (* (pow a 2) (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))))) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (+ h (* -1 h))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (cbrt 1/2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (pow (cbrt 1/2) 2) g)))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* -1 (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))) (* -1 (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* -1 (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))) (+ (* -1 (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/2) 2)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* -1 (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt 1/2) (cbrt 2)))) (+ (* -1 (* (cbrt (/ (+ h (* -1 h)) a)) (/ (* (cbrt -1/2) (cbrt 1/2)) g))) (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) a)) (/ (* (cbrt 1/2) (+ h (* -1 h))) (pow (cbrt 2) 2)))) (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (* (cbrt -1/2) (- (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/12 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/2))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2)))))) (pow (cbrt 1/2) 2))))) (pow g 3))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (* (cbrt -1/2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/2) 2))))))))))))
#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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2)))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (/ (+ h (* -1 h)) a)) (/ (cbrt 1/4) g))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* g (+ (* 1/12 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/4) 2)))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (cbrt 1/4) g)))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* g (+ (* 1/12 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)) (cbrt (/ 1 (pow (cbrt 1/4) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/48 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/4))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 3) (pow (cbrt 1/4) 2))))) (+ (* (cbrt (/ 1 (* a (pow g 2)))) (* (cbrt -1/2) (cbrt 2))) (* (cbrt (/ (+ h (* -1 h)) a)) (/ (cbrt 1/4) g))))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/4))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (* 1/12 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/4) 2)))))) (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/4)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (* 1/12 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/4) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/48 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/4))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (pow (cbrt 1/4) 2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/4))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (* 1/12 (* (pow (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2))) 1/9) (* (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g) (cbrt (/ 1 (pow (cbrt 1/4) 2)))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/4 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) a)) (+ (* 1/1728 (* (cbrt (/ 1 (* (pow a 7) (pow (+ h (* -1 h)) 2)))) (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (cbrt 1/4) 2)))) (* 1/6 (* (pow (/ 1 (* (pow a 4) (pow (+ h (* -1 h)) 5))) 1/9) (* (cbrt (/ 1 (pow (cbrt 1/4) 5))) (* (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (- (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/48 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/4))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))))))))) (* (pow g 3) (pow (cbrt 1/4) 2))))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (pow (+ h (* -1 h)) 2))) (/ (- (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) a)) (* 1/48 (* (pow (/ 1 (* (pow a 17) (+ h (* -1 h)))) 1/9) (* (cbrt (/ 1 (cbrt 1/4))) (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))))) (* (pow g 2) (pow (cbrt 1/4) 2))))) (* (cbrt (/ (+ h (* -1 h)) a)) (cbrt 1/4)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (log (* 1/4 (/ (+ h (* -1 h)) a))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (log (* 1/4 (/ (+ h (* -1 h)) a)))) (* 1/3 (/ (- (* -1 (/ (pow h 2) (+ h (* -1 h)))) (* 1/4 (+ h (* -1 h)))) g)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/6 (/ (+ (* -1 (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* -1 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2) (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/3 (log (* 1/4 (/ (+ h (* -1 h)) a)))) (* 1/3 (/ (- (* -1 (/ (pow h 2) (+ h (* -1 h)))) (* 1/4 (+ h (* -1 h)))) g))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/18 (/ (+ (* -6 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (+ h (* -1 h)))) (+ (* 2 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (+ h (* -1 h)) 3))) (* 3 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2) (+ h (* -1 h)))))) (pow g 3))) (+ (* 1/6 (/ (+ (* -1 (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* -1 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2) (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/3 (log (* 1/4 (/ (+ h (* -1 h)) a)))) (* 1/3 (/ (- (* -1 (/ (pow h 2) (+ h (* -1 h)))) (* 1/4 (+ h (* -1 h)))) g)))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (log (* 1/4 (/ (+ h (* -1 h)) a)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (- (+ (log (* 1/4 (/ (+ h (* -1 h)) a))) (* -1 (/ (pow h 2) (* g (+ h (* -1 h)))))) (* 1/4 (/ (+ h (* -1 h)) g)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (- (+ (log (* 1/4 (/ (+ h (* -1 h)) a))) (+ (* -1 (/ (pow h 2) (* g (+ h (* -1 h))))) (* 1/2 (/ (+ (* -1 (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* -1 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2) (pow (+ h (* -1 h)) 2)))) (pow g 2))))) (* 1/4 (/ (+ h (* -1 h)) g)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (- (+ (log (* 1/4 (/ (+ h (* -1 h)) a))) (+ (* -1 (/ (pow h 2) (* g (+ h (* -1 h))))) (+ (* 1/6 (/ (+ (* -6 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (+ h (* -1 h)))) (+ (* 2 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 3) (pow (+ h (* -1 h)) 3))) (* 3 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2) (+ h (* -1 h)))))) (pow g 3))) (* 1/2 (/ (+ (* -1 (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* -1 (/ (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2) (pow (+ h (* -1 h)) 2)))) (pow g 2)))))) (* 1/4 (/ (+ h (* -1 h)) g)))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* 1/4 (/ (+ h (* -1 h)) a))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (+ (* 1/4 (/ (+ h (* -1 h)) a)) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (+ (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 2)))) (+ (* 1/4 (/ (+ h (* -1 h)) a)) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (+ (* -1/4 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (* a (pow g 3)))) (+ (* -1/8 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (* a (pow g 2)))) (+ (* 1/4 (/ (+ h (* -1 h)) a)) (* 1/4 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (* a g))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* 1/2 (+ h (* -1 h)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (+ (* -1/2 (/ (+ (* -1/4 (* (pow (+ h (* -1 h)) 2) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))))) (* 1/4 (pow (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) 2))) (pow g 3))) (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 2))) (+ (* 1/2 (+ h (* -1 h))) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 g))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (* 1/2 (/ (+ h (* -1 h)) g))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* g (+ 1 (+ (* -1/4 (/ (* (+ h (* -1 h)) (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2)))) (pow g 3))) (+ (* 1/2 (/ (+ h (* -1 h)) g)) (* 1/2 (/ (- (* -1 (pow h 2)) (* 1/4 (pow (+ h (* -1 h)) 2))) (pow g 2)))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (pow g 2)))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (+ (* -1 (/ h g)) (/ h g))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (+ (* -1 (/ h g)) (+ (* -1 (/ (pow h 2) (pow g 2))) (/ h g)))))))
#s(approx (+ g h) #s(hole binary64 g))
#s(approx (+ g h) #s(hole binary64 (* g (+ 1 (/ h g)))))
#s(approx (- g h) #s(hole binary64 g))
#s(approx (- g h) #s(hole binary64 (* g (+ 1 (* -1 (/ h g))))))
#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)))))) (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 (+ g (* -1/2 (/ (* h h) g))) #s(hole binary64 (* -1 (* g (- (* 1/2 (/ (pow h 2) (pow g 2))) 1)))))
#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 (* (pow (/ g a) 1/3) 1)) #s(hole binary64 (* (cbrt (/ g a)) (cbrt -1))))
#s(approx (* (pow (/ g a) 1/3) 1) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#s(approx (pow (/ g a) 1/3) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (cbrt -1)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* g (+ (* (cbrt (/ (* (pow a 2) (+ 1 (pow (sqrt -1) 2))) (pow g 2))) (cbrt 1/2)) (* (cbrt (/ (* (pow a 2) (- (pow (sqrt -1) 2) 1)) (pow g 2))) (cbrt -1/2)))) a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h)))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) g)) (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))))) (pow g 3))) (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt -1/2))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* g (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (- (pow (sqrt -1) 2) 1) 2))))) (* (cbrt 1/2) (+ h (* -1 h)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))))) (+ (* 1/6 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) (pow g 3))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* g (+ (* -1 (+ (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt -1/2)) (* (cbrt (/ (- (pow (sqrt -1) 2) 1) (* a (pow g 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (+ h (* -1 h))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (+ h (* -1 h))))))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (* (cbrt -1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow g 4) (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (* (cbrt 1/2) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))))))) (+ (* -1/12 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (cbrt -1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))) (* -1/12 (* (cbrt (/ g (* a (pow (- (pow (sqrt -1) 2) 1) 2)))) (/ (* (cbrt 1/2) (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 2)))))) g))) (pow g 3))))))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (* (pow (cbrt -1) 2) (cbrt -1/4)))))
#s(approx (cbrt (/ (/ (* h h) a) g)) #s(hole binary64 (* (cbrt (/ (pow h 2) (* a g))) (pow (cbrt -1) 2))))
#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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* (cbrt (/ (* g (+ 1 (pow (sqrt -1) 2))) a)) (cbrt 1/2)))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ 1 (* a (* (pow g 2) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (/ (+ h (* -1 h)) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (pow (cbrt 1/2) 2)))) g)) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/24 (* (cbrt (/ (* (pow g 2) (pow h 8)) a)) (/ 1 (cbrt 1/2)))) (* 1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2))))) (pow g 3))) (+ (* 1/12 (* (cbrt (/ 1 (* a (* (pow g 2) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (/ (+ h (* -1 h)) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (pow (cbrt 1/2) 2))))) g)) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* (cbrt (/ (* g (+ 1 (pow (sqrt -1) 2))) a)) (cbrt 1/2)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* g (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow g 5) (pow (+ 1 (pow (sqrt -1) 2)) 2))))) (/ (+ h (* -1 h)) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (* 1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (+ h (* -1 h)) (pow (cbrt 1/2) 2))))) (pow g 3))) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/24 (* (cbrt (/ g (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* (pow (cbrt 1/2) 2) (pow (sqrt -1) 2))))) (* 1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2))))) g)) (* 1/12 (* (cbrt (/ (pow g 4) (* a (pow (+ 1 (pow (sqrt -1) 2)) 2)))) (/ (+ h (* -1 h)) (pow (cbrt 1/2) 2))))) (pow g 3))) (* (cbrt (/ (+ 1 (pow (sqrt -1) 2)) (* a (pow g 2)))) (cbrt 1/2)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (* -1 (log (/ -1 g)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1/6 (/ (+ h (* -1 h)) (* g (+ 1 (pow (sqrt -1) 2))))) (* 1/3 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (* -1 (log (/ -1 g))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1 (/ (+ (* -1/6 (/ (- (+ (* -1/4 (/ (pow (+ h (* -1 h)) 2) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (pow h 2) (+ 1 (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow (sqrt -1) 2) (+ 1 (pow (sqrt -1) 2)))))) g)) (* 1/6 (/ (+ h (* -1 h)) (+ 1 (pow (sqrt -1) 2))))) g)) (* 1/3 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (* -1 (log (/ -1 g))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/18 (/ (+ (* -3/2 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* (pow (sqrt -1) 2) (+ 1 (pow (sqrt -1) 2))))) (+ (* -3/2 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* 1/4 (/ (pow (+ h (* -1 h)) 3) (pow (+ 1 (pow (sqrt -1) 2)) 3))))) g)) (* 1/6 (- (+ (* -1/4 (/ (pow (+ h (* -1 h)) 2) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (pow h 2) (+ 1 (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow (sqrt -1) 2) (+ 1 (pow (sqrt -1) 2)))))))) g)) (* 1/6 (/ (+ h (* -1 h)) (+ 1 (pow (sqrt -1) 2))))) g)) (* 1/3 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (* -1 (log (/ -1 g))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (* -1 (log (/ -1 g))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (+ (* -1 (log (/ -1 g))) (* -1/2 (/ (+ h (* -1 h)) (* g (+ 1 (pow (sqrt -1) 2)))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (+ (* -1 (log (/ -1 g))) (* -1 (/ (+ (* -1/2 (/ (- (+ (* -1/4 (/ (pow (+ h (* -1 h)) 2) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (pow h 2) (+ 1 (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow (sqrt -1) 2) (+ 1 (pow (sqrt -1) 2)))))) g)) (* 1/2 (/ (+ h (* -1 h)) (+ 1 (pow (sqrt -1) 2))))) g))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a))) (+ (* -1 (log (/ -1 g))) (* -1 (/ (+ (* -1 (/ (+ (* -1/6 (/ (+ (* -3/2 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* (pow (sqrt -1) 2) (+ 1 (pow (sqrt -1) 2))))) (+ (* -3/2 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (* 1/4 (/ (pow (+ h (* -1 h)) 3) (pow (+ 1 (pow (sqrt -1) 2)) 3))))) g)) (* 1/2 (- (+ (* -1/4 (/ (pow (+ h (* -1 h)) 2) (pow (+ 1 (pow (sqrt -1) 2)) 2))) (/ (pow h 2) (+ 1 (pow (sqrt -1) 2)))) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (* (pow (sqrt -1) 2) (+ 1 (pow (sqrt -1) 2)))))))) g)) (* 1/2 (/ (+ h (* -1 h)) (+ 1 (pow (sqrt -1) 2))))) g))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1/2 (/ (* g (+ 1 (pow (sqrt -1) 2))) a))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1 (* g (+ (* -1/4 (/ (+ h (* -1 h)) (* a g))) (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/4 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) (* a g))) (* 1/4 (/ (+ h (* -1 h)) a))) g)) (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* a (* g (pow (sqrt -1) 2))))) (* 1/4 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) a))) g)) (* 1/4 (/ (+ h (* -1 h)) a))) g)) (* 1/2 (/ (+ 1 (pow (sqrt -1) 2)) a)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* g (+ 1 (pow (sqrt -1) 2))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* g (+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (pow (sqrt -1) 2)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1/2 (/ (+ h (* -1 h)) g)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1/2 (/ (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* g (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ h (* -1 h)) (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2))))) (* g (pow (sqrt -1) 2)))) (* 1/2 (- (pow h 2) (* 1/4 (/ (pow (+ h (* -1 h)) 2) (pow (sqrt -1) 2)))))) g)) (* 1/2 (+ h (* -1 h)))) g)) (pow (sqrt -1) 2))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow g 2) (+ 1 (* -1 (/ (+ (* -1 (+ h (* -1 h))) (/ (pow h 2) g)) g))))))
#s(approx (+ g h) #s(hole binary64 (* -1 (* g (- (* -1 (/ h g)) 1)))))
#s(approx (- g h) #s(hole binary64 (* -1 (* g (- (/ h g) 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))) (* (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 (* -1/2 (/ (* h h) g))) #s(hole binary64 (+ g (* -1/2 (/ (pow h 2) g)))))
#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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt 1/2) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))))) (* (cbrt (* (pow a 2) g)) (* (cbrt -1/2) (cbrt 2)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* h (* (cbrt -1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* h (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* h (+ (* 1/6 (* (pow (/ (* 1 (pow a 5)) (pow g 11)) 1/9) (* (* (cbrt -1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))) (* h (+ (* 1/12 (* (/ (* a (* (cbrt 1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))))) (pow g 3)) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g))) 2))))) (* 1/3 (* (cbrt (/ 1 (* (pow a 7) (pow g 2)))) (/ (* (cbrt -1/2) (- (* 1/4 (/ (* (pow a 2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))) (+ (* 1/216 (* (cbrt (/ (pow a 14) (pow g 11))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ (* 1 (pow a 8)) (pow g 14)) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (* (pow a 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/12 (* (pow (/ (* 1 (pow a 34)) (pow g 19)) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2)))))))))) (+ (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))) (* (/ (cbrt 1/2) a) (cbrt (+ (* -1/2 (/ (* (pow a 2) (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))))) g)) (* 1/2 (/ (* (pow a 2) (* h (+ g (* -1 g)))) g)))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* h (* (cbrt 1/2) (+ g (* -1 g)))) (cbrt (/ 1 (pow (cbrt 2) 2)))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))) (* h (+ (* -1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* h (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2))))))) (pow (cbrt 2) 2)))) (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (+ (* -1 (+ (* (cbrt -1/2) (cbrt (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))))) (* (cbrt (/ g a)) (* (cbrt 1/2) (cbrt 2))))) (* h (+ (* -1/6 (* (pow (/ 1 (* (pow a 7) (pow g 11))) 1/9) (* (* (cbrt 1/2) (+ g (* -1 g))) (cbrt (/ 1 (pow (cbrt 2) 2)))))) (* h (+ (* -1 (* h (+ (* 1/12 (* (/ (* (cbrt -1/2) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/2 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/2 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3)))) (+ (* 1/216 (* (cbrt (/ 1 (* (pow a 7) (pow g 11)))) (/ (pow (+ g (* -1 g)) 3) (pow (cbrt 2) 2)))) (* 1/3 (* (pow (/ 1 (* (pow a 4) (pow g 14))) 1/9) (* (cbrt (/ 1 (pow (cbrt 2) 5))) (* (+ g (* -1 g)) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))))))))) (pow (cbrt 2) 2))))))) (* -1/3 (* (cbrt (/ (pow a 2) (pow g 2))) (/ (* (cbrt 1/2) (- (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/12 (* (pow (/ 1 (* (pow a 17) (pow g 19))) 1/9) (* (cbrt (/ 1 (cbrt 2))) (pow (+ g (* -1 g)) 2)))))) (pow (cbrt 2) 2)))))))))))
#s(approx (/ (* h h) a) #s(hole binary64 (/ (pow h 2) a)))
#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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (* (cbrt (/ g a)) (* (cbrt -1/2) (cbrt 2))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (+ (* -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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (+ (* (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)))) (* 1/24 (* (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2)))))))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (+ (* (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)))) (* h (+ (* 1/24 (* (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* h (+ (* -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/12 (* (/ (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2)))))))))))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (* 1/24 (* (/ (* (pow h 3) (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (* (pow h 3) (+ (* -1/12 (* (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* 1/24 (* (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (+ (cbrt (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g))))) (* (pow h 3) (+ (* 1/24 (* (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* h (+ (* -1/12 (* (/ (* h (+ (* -1/2 (/ (* (+ g (* -1 g)) (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (pow g 2))) (* -1/4 (/ (* (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (+ g (* -1 g))) (pow g 4))))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))) (* -1/12 (* (/ (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))) (* a g)) (cbrt (/ 1 (pow (+ (* -1/4 (/ (* (pow h 2) (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))) 2))))))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log h) (log (* 1/4 (/ (+ g (* -1 g)) (* a g))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1/3 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (+ g (* -1 g)))) (* 1/3 (+ (log h) (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (+ (log h) (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))))) (* h (+ (* -1/3 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* 1/6 (* h (+ (* -1 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow (+ g (* -1 g)) 2))) (+ (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (/ 1 (pow g 2)))))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (+ (log h) (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))))) (* h (+ (* -1/3 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* h (+ (* 1/18 (* h (+ (* -6 (/ (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))) (+ g (* -1 g)))) (+ (* -2 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 3) (pow (+ g (* -1 g)) 3))) (* 3 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (* (pow g 2) (+ g (* -1 g))))))))) (* 1/6 (+ (* -1 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow (+ g (* -1 g)) 2))) (+ (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (/ 1 (pow g 2))))))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log h) (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log h) (+ (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))) (* -1 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (+ g (* -1 g))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log h) (+ (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))) (* h (+ (* -1 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* 1/2 (* h (+ (* -1 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow (+ g (* -1 g)) 2))) (+ (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (/ 1 (pow g 2))))))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log h) (+ (log (* 1/4 (/ (+ g (* -1 g)) (* a g)))) (* h (+ (* -1 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* h (+ (* 1/6 (* h (+ (* -6 (/ (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2)))) (+ g (* -1 g)))) (+ (* -2 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 3) (pow (+ g (* -1 g)) 3))) (* 3 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (* (pow g 2) (+ g (* -1 g))))))))) (* 1/2 (+ (* -1 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow (+ g (* -1 g)) 2))) (+ (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 4))) (/ 1 (pow g 2)))))))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* 1/4 (/ (* h (+ g (* -1 g))) (* a g)))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* h (+ (* -1/4 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) (* a g))) (* 1/4 (/ (+ g (* -1 g)) (* a g)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* h (+ (* 1/4 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/4 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* 1/8 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (* a (pow g 3))))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* h (+ (* 1/4 (/ (+ g (* -1 g)) (* a g))) (* h (+ (* -1/4 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (* a g))) (* h (+ (* -1/4 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) (* a g))) (* 1/8 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (* a (pow g 3))))))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* 1/2 (/ (* h (+ g (* -1 g))) g))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3)))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* h (+ (* -1/2 (/ (* h (+ (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (pow (+ g (* -1 g)) 2)) (pow g 4))) (* 1/4 (/ (pow (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) 2) (pow g 2))))) g)) (* 1/4 (/ (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g))) (pow g 3)))))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* 1/2 (/ (* h (+ g (* -1 g))) g)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* h (+ (* -1/2 (/ (* h (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2))))) g)) (* 1/2 (/ (+ g (* -1 g)) g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (+ g (* h (+ (* 1/2 (/ (+ g (* -1 g)) g)) (* h (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) g)) (* 1/4 (/ (* h (* (+ 1 (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow g 2)))) (+ g (* -1 g)))) (pow g 3))))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* h (+ g (* -1 g))) (pow g 2))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (+ (* h (+ g (+ (* -1 g) (* -1 h)))) (pow g 2))))
#s(approx (- g h) #s(hole binary64 (+ g (* -1 h))))
#s(approx (- (* g g) (* h h)) #s(hole binary64 (+ (* -1 (pow h 2)) (pow g 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 (+ (* (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 (* -1/2 (/ (* h h) g))) #s(hole binary64 (* (pow h 2) (- (/ g (pow h 2)) (* 1/2 (/ 1 g))))))
#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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* h (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* -1/12 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (+ (* 1/3 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))) (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #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 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (pow h 4))) (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 3))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) (pow h 5))) (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (pow h 4))) (* -1 (/ (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))) (pow h 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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* h (+ (* 1/12 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* h (+ (* -1/24 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (cbrt 1/2) 2)))) (+ (* 1/12 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 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 (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* h (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* h (+ (* 1/12 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* h (+ (* -1/24 (* (cbrt (/ 1 (* a (* (pow h 11) (pow (sqrt -1) 11))))) (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (cbrt 1/2) 2)))) (+ (* 1/12 (* (cbrt (/ 1 (* a (* (pow h 8) (pow (sqrt -1) 5))))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (+ (* 1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ 1 h)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ 1 h))))) (* 1/3 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/6 (/ (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))) (pow h 2))) (+ (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ 1 h))))) (* 1/3 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* 1/18 (/ (+ (* -3 (/ (* a (* (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 3))) (+ (* -3/2 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 4))) (* 2 (/ (* (pow a 3) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 3)) (pow (sqrt -1) 3))))) (pow h 3))) (+ (* 1/6 (/ (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))) (pow h 2))) (+ (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ 1 h))))) (* 1/3 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1)))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ 1 h))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (+ (* -1 (log (/ 1 h))) (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1)))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (+ (* -1 (log (/ 1 h))) (+ (* 1/2 (/ (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))) (pow h 2))) (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (+ (* -1 (log (/ 1 h))) (+ (* 1/6 (/ (+ (* -3 (/ (* a (* (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 3))) (+ (* -3/2 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 4))) (* 2 (/ (* (pow a 3) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 3)) (pow (sqrt -1) 3))))) (pow h 3))) (+ (* 1/2 (/ (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))) (pow h 2))) (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1)))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* h (+ (* 1/2 (/ (sqrt -1) a)) (* 1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* h (+ (* 1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (+ (* 1/2 (/ (sqrt -1) a)) (* 1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* h (+ (* -1/8 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* (pow h 3) (pow (sqrt -1) 3))))) (+ (* 1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* (pow h 2) (sqrt -1))))) (+ (* 1/2 (/ (sqrt -1) a)) (* 1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (- (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))) (/ g h)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))) (/ g h)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* h (- (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))) (/ g h)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* h (+ (sqrt -1) (+ (* -1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* (pow h 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* (pow h 2) (sqrt -1))))))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (+ (* -1 (/ g h)) (/ g h)) 1))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (+ (* -1 (/ g h)) (+ (/ g h) (/ (pow g 2) (pow h 2)))) 1))))
#s(approx (+ g h) #s(hole binary64 (* h (+ 1 (/ g h)))))
#s(approx (- g h) #s(hole binary64 (* h (- (/ g h) 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)))))) (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 (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (/ (* h (+ (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt -1/2)) (* (cbrt (/ (* (pow a 2) (sqrt -1)) (pow h 2))) (cbrt 1/2)))) a))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) h)) (+ (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt -1/2) (+ g (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))))))) (* 1/3 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (* (cbrt 1/2) (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g)))))) (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 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #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 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (+ (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (pow a 2) (* (pow h 5) (pow (sqrt -1) 2)))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))) (+ (* 1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) (pow h 3))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (* h (+ (* -1 (+ (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt -1/2)) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))) (* -1 (/ (+ (* -1 (+ (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt -1/2) (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))) (* 1/3 (* (cbrt (/ (* (pow a 2) (pow h 4)) (pow (sqrt -1) 2))) (* (cbrt 1/2) (+ (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))))))) (* -1 (/ (+ (* -1 (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt -1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (cbrt 1/2) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))))))) (+ (* -1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt -1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))) (* -1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (* (cbrt 1/2) (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))))))) h))) (pow h 3))))))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) #s(hole binary64 (* -1 (* (cbrt (/ (pow h 2) (* a g))) (* (cbrt -1) (cbrt -1/4))))))
#s(approx (cbrt (/ (/ (* h h) a) g)) #s(hole binary64 (* -1 (* (cbrt (/ (pow h 2) (* a g))) (cbrt -1)))))
#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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt -1/2))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 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 (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/24 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (cbrt 1/2) 2)))) (+ (* 1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (* (pow g 2) (cbrt -1/2)))))) h)) (+ (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 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 (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* (cbrt (/ (* h (sqrt -1)) a)) (cbrt 1/2)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* h (+ (* -1/6 (* (cbrt (/ 1 (* a (* (pow h 5) (pow (sqrt -1) 2))))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 2)))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/12 (* (cbrt (/ h (* a (pow (sqrt -1) 5)))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2)))) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 2))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/24 (* (cbrt (/ h (* a (pow (sqrt -1) 11)))) (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (cbrt 1/2) 2)))) (* 1/12 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 5)))) (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (pow (cbrt 1/2) 2))))) h)) (* 1/6 (* (cbrt (/ (pow h 4) (* a (pow (sqrt -1) 2)))) (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) (pow (cbrt 1/2) 2))))) (pow h 3))) (* (cbrt (/ (sqrt -1) (* a (pow h 2)))) (cbrt 1/2)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ -1 h)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1/3 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1)))) (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ -1 h))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1 (/ (+ (* -1/6 (/ (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))) h)) (* 1/3 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (sqrt -1)))) h)) (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ -1 h))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/18 (/ (+ (* -3 (/ (* a (* (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 3))) (+ (* -3/2 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 4))) (* 2 (/ (* (pow a 3) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 3)) (pow (sqrt -1) 3))))) h)) (* 1/6 (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))))) h)) (* 1/3 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (sqrt -1)))) h)) (* 1/3 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ -1 h))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (* -1 (log (/ -1 h))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (+ (* -1 (log (/ -1 h))) (* -1 (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (* h (sqrt -1))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (+ (* -1 (log (/ -1 h))) (* -1 (/ (+ (* -1/2 (/ (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))) h)) (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (sqrt -1))) h))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (/ (sqrt -1) a))) (+ (* -1 (log (/ -1 h))) (* -1 (/ (+ (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (/ (* a (* (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))))) (pow (sqrt -1) 3))) (+ (* -3/2 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (pow (sqrt -1) 4))) (* 2 (/ (* (pow a 3) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 3)) (pow (sqrt -1) 3))))) h)) (* 1/2 (- (+ (* -1 (/ (* (pow a 2) (pow (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) 2)) (pow (sqrt -1) 2))) (/ (pow g 2) (pow (sqrt -1) 2))) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 4)))))) h)) (/ (* a (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a))) (sqrt -1))) h))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1/2 (/ (* h (sqrt -1)) a))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1 (* h (+ (* -1/2 (/ (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (* h (sqrt -1))))) (* 1/2 (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* -1 (* h (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* a (* h (pow (sqrt -1) 3))))) (* 1/4 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* a (sqrt -1))))) h)) (* 1/2 (- (* 1/2 (/ (+ g (* -1 g)) (* a (sqrt -1)))) (/ g a)))) h)) (* 1/2 (/ (sqrt -1) a)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (* 1/2 (/ (+ g (* -1 g)) (sqrt -1))) g) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (- (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) g) h)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (sqrt -1)))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1/2 (/ (+ g (* -1 g)) (* h (sqrt -1)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (* h (sqrt -1)))) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (sqrt (* (+ g h) (- g h))) #s(hole binary64 (* -1 (* h (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ g (* -1 g)) (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2))))) (* h (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow g 2) (* 1/4 (/ (pow (+ g (* -1 g)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) h)) (* 1/2 (/ (+ g (* -1 g)) (sqrt -1)))) h)))))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (* -1 (/ (+ g (* -1 g)) h)) 1))))
#s(approx (* (+ g h) (- g h)) #s(hole binary64 (* (pow h 2) (- (* -1 (/ (+ g (+ (* -1 g) (* -1 (/ (pow g 2) h)))) h)) 1))))
#s(approx (+ g h) #s(hole binary64 (* -1 (* h (- (* -1 (/ g h)) 1)))))
#s(approx (- g h) #s(hole binary64 (* -1 (* h (+ 1 (* -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 (/ (+ (* (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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt -1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt 1/2))) a)))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (/ (+ (* (cbrt (* (pow a 2) (+ g (sqrt (* (+ g h) (- g h)))))) (cbrt 1/2)) (* (cbrt (* (pow a 2) (- (sqrt (* (+ g h) (- g h))) g))) (cbrt -1/2))) a))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (* (+ g h) (- g h))) g))) (cbrt 1/2))) a)))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log (* 1/2 (- (sqrt (* (+ g h) (- g h))) g))) (* -1 (log a))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (- (sqrt (* (+ g h) (- g h))) g))) (* -1 (log a)))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) #s(hole binary64 (* 1/2 (/ (- (sqrt (* (+ g h) (- g h))) g) a))))
#s(approx (/ 1/2 a) #s(hole binary64 (/ 1/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 (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt -1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt 1/2)))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (* (+ g h) (- g h))) g) a)) (cbrt 1/2)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log (* 1/2 (- (sqrt (* (+ g h) (- g h))) g))) (log (/ 1 a))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* 1/2 (- (sqrt (* (+ g h) (- g h))) g))) (log (/ 1 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) (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)))))
#s(approx (neg (* (pow (/ g a) 1/3) 1)) #s(hole binary64 (* -1 (* (cbrt (/ g a)) (pow (cbrt -1) 2)))))
#s(approx (* (pow (/ g a) 1/3) 1) #s(hole binary64 (* (cbrt (/ g a)) (pow (cbrt -1) 2))))
#s(approx (pow (/ g a) 1/3) #s(hole binary64 (* (cbrt (/ g a)) (pow (cbrt -1) 2))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (cbrt -1) (cbrt -1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt 1/2)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) #s(hole binary64 (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (* (pow (cbrt -1) 2) (cbrt 1/2))) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (pow (cbrt -1) 2) (cbrt -1/2)))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (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 (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt -1/2))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) #s(hole binary64 (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (* (cbrt -1) (cbrt -1/2)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) #s(hole binary64 (* 1/3 (+ (log (* -1/2 (- (sqrt (* (+ g h) (- g h))) g))) (log (/ -1 a))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) #s(hole binary64 (+ (log (* -1/2 (- (sqrt (* (+ g h) (- g h))) g))) (log (/ -1 a)))))
Outputs
(/.f64 (+.f64 (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))) #s(literal 3 binary64))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))))))) (-.f64 (*.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a)))) (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a)))))))
(+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
(*.f64 (cbrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))) (cbrt.f64 (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))))))
(pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))))) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))
(pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 2 binary64) a)))
(/.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 (+.f64 (pow.f64 (neg.f64 g) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))) #s(literal 3 binary64))) (+.f64 (*.f64 g g) (-.f64 (*.f64 #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))) (*.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))))
(+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))))
(neg.f64 g)
g
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))
(/.f64 (+.f64 (pow.f64 g #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)) #s(literal 3 binary64))) (+.f64 (*.f64 g g) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))) (*.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))
(+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))
#s(literal -1/2 binary64)
(/.f64 (neg.f64 (*.f64 h h)) (neg.f64 g))
(/.f64 (*.f64 h h) g)
(*.f64 (neg.f64 h) (neg.f64 h))
(*.f64 (fabs.f64 h) (fabs.f64 h))
(*.f64 h h)
(pow.f64 h #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 h) #s(literal 2 binary64)))
h
(pow.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a)) #s(literal 1/3 binary64))
(cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))
(/.f64 (neg.f64 (neg.f64 g)) (neg.f64 a))
(/.f64 (neg.f64 g) 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))))))) (neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
(neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))
(*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))
(pow.f64 (/.f64 g a) #s(literal 1/3 binary64))
(/.f64 (cbrt.f64 g) (cbrt.f64 a))
(cbrt.f64 (/.f64 g a))
(exp.f64 (*.f64 (log.f64 (/.f64 g a)) #s(literal 1/3 binary64)))
(/.f64 (neg.f64 g) (neg.f64 a))
(/.f64 g a)
#s(literal 1/3 binary64)
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))
(*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))) (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))
(*.f64 (cbrt.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g)))) (cbrt.f64 #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64)) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))
(/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 a (*.f64 g g))))
(/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g)))
(+.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 a (*.f64 g g))))
#s(literal 0 binary64)
(*.f64 a (*.f64 g g))
(*.f64 (fabs.f64 g) (fabs.f64 g))
(*.f64 (neg.f64 g) (neg.f64 g))
(*.f64 g g)
(pow.f64 g #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 g) #s(literal 2 binary64)))
(*.f64 (cbrt.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g)))) (cbrt.f64 #s(literal 1/2 binary64)))
(pow.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))
(/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g)))
(/.f64 #s(literal 2 binary64) (neg.f64 (*.f64 a (*.f64 g g))))
(-.f64 (/.f64 #s(literal -1 binary64) (*.f64 a (*.f64 g g))) (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)))
#s(literal -2 binary64)
#s(literal 1/2 binary64)
(/.f64 (+.f64 (pow.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64))))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))))) (*.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))))))))
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64))))
(*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))
(cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))
(pow.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal 1/3 binary64))
(/.f64 (cbrt.f64 (/.f64 (*.f64 h h) a)) (cbrt.f64 g))
(cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g))
(/.f64 (neg.f64 (/.f64 (*.f64 h h) a)) (neg.f64 g))
(/.f64 (/.f64 (*.f64 h h) a) g)
(/.f64 (neg.f64 (*.f64 h h)) (neg.f64 a))
(/.f64 (*.f64 h h) a)
(*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))
(pow.f64 #s(literal -1/4 binary64) #s(literal 1/3 binary64))
(cbrt.f64 #s(literal -1/4 binary64))
#s(literal -1/4 binary64)
(*.f64 (cbrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))) (cbrt.f64 (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))))
(pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))
(-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))
#s(approx (sqrt (- (* g g) (* h h))) g)
(/.f64 (+.f64 (pow.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64)))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))))))
(+.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))))
(pow.f64 (exp.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))))) #s(literal 1/3 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))) #s(literal 1/3 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))))
(*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))
(+.f64 (log.f64 (/.f64 #s(literal 1/2 binary64) a)) (log.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))))
(log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))))
(*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))
(/.f64 #s(literal 1/2 binary64) a)
(/.f64 #s(literal -1/2 binary64) (neg.f64 a))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 3 binary64)) (pow.f64 (neg.f64 g) #s(literal 3 binary64))) (+.f64 (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) (-.f64 (*.f64 g g) (*.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))))
(+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))
(*.f64 (sqrt.f64 (+.f64 g h)) (sqrt.f64 (-.f64 g h)))
(pow.f64 (*.f64 (+.f64 g h) (-.f64 g h)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))
(*.f64 (+.f64 g h) (-.f64 g h))
(/.f64 (+.f64 (pow.f64 g #s(literal 3 binary64)) (pow.f64 h #s(literal 3 binary64))) (+.f64 (*.f64 g g) (-.f64 (*.f64 h h) (*.f64 g h))))
(+.f64 g h)
(-.f64 g h)
(*.f64 (cbrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))) (cbrt.f64 (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))
(pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))) #s(literal 1/3 binary64))
(cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.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))))
(pow.f64 (-.f64 (*.f64 g g) (*.f64 h h)) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))
(-.f64 (*.f64 g g) (*.f64 h 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))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))))) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))) (*.f64 #s(literal -1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))) (*.f64 #s(literal -1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 g (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (-.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 g g) (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (+.f64 (*.f64 #s(literal -1 binary64) g) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (+.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 g (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (+.f64 (*.f64 g (-.f64 (*.f64 g (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 g g) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (neg g) (*.f64 #s(literal -1 binary64) g))
#s(approx g g)
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 g g) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 g g) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)))))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 g g) (+.f64 (*.f64 (*.f64 g g) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 g g) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)))))))
#s(approx (+ g (* -1/2 (/ (* h h) g))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))
#s(approx (+ g (* -1/2 (/ (* h h) g))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (*.f64 g g)) g))
#s(approx (* -1/2 (/ (* h h) g)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))
#s(approx (/ (* h h) g) (/.f64 (*.f64 h h) g))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 g (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g a)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 g (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (-.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 g g) (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (/ (neg g) a) (*.f64 #s(literal -1 binary64) (/.f64 g a)))
#s(approx (neg (* (pow (/ g a) 1/3) 1)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (/.f64 g a))))
#s(approx (* (pow (/ g a) 1/3) 1) (cbrt.f64 (/.f64 g a)))
#s(approx (pow (/ g a) 1/3) (cbrt.f64 (/.f64 g a)))
#s(approx (/ g a) (/.f64 g a))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/2 binary64)))) a))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (pow.f64 a #s(literal 5 binary64)) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 2 binary64))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))))))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -1 binary64)) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -1 binary64)) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 h h)) (/.f64 (*.f64 a a) #s(literal -1 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -1 binary64)) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/27 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64)))) #s(literal 1/9 binary64))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -1 binary64)) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))))))))))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -1 binary64)) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 h #s(literal -1 binary64)) (/.f64 a (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1/9 binary64))) (pow.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) #s(literal 2 binary64))))))))))))))))
#s(approx (* g (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2)))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (+ (cbrt (* (/ 0 (* a (* g g))) -1/2)) (cbrt (* (/ -2 (* a (* g g))) 1/2))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (cbrt (* (/ 0 (* a (* g g))) -1/2)) #s(literal 0 binary64))
#s(approx (* (/ 0 (* a (* g g))) -1/2) #s(literal 0 binary64))
#s(approx (/ 0 (* a (* g g))) #s(literal 0 binary64))
#s(approx (* a (* g g)) (*.f64 a (*.f64 g g)))
#s(approx (* g g) (*.f64 g g))
#s(approx (cbrt (* (/ -2 (* a (* g g))) 1/2)) (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (* (/ -2 (* a (* g g))) 1/2) (/.f64 #s(literal -1 binary64) (*.f64 a (*.f64 g g))))
#s(approx (/ -2 (* a (* g g))) (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))))
#s(approx (cbrt (/ (/ (* h h) a) g)) (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))))
#s(approx (/ (/ (* h h) a) g) (/.f64 (*.f64 h h) (*.f64 a g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 #s(literal -1 binary64) g) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 g (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 g (-.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 g g) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (cbrt.f64 #s(literal -1/2 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/27 binary64) (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (*.f64 #s(literal 2/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (/.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (/.f64 (*.f64 g (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))))))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 a h) (/.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (*.f64 (*.f64 h h) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) #s(literal 1 binary64))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 a h) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))) (*.f64 g (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 a h) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/18 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (*.f64 a (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -3/2 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (pow.f64 h #s(literal 4 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) #s(literal 1 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (*.f64 (*.f64 h h) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) #s(literal 1 binary64))))))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))) (*.f64 (/.f64 a h) (/.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))) (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (*.f64 (*.f64 h h) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) #s(literal 1 binary64))))))) (*.f64 (/.f64 a h) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))) (*.f64 g (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (*.f64 a (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -3/2 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (pow.f64 h #s(literal 4 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) #s(literal 1 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (pow.f64 (*.f64 (*.f64 h h) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) #s(literal 1 binary64)))))))) (*.f64 (/.f64 a h) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 g a) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)) (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 a #s(literal -1 binary64)))) (*.f64 g (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 g a) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64)))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (+.f64 (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (+.f64 (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (+.f64 (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))) #s(literal 1 binary64))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (sqrt (* (+ g h) (- g h))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ g h) (- g h))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 g h) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ g h) (- g h))) (+.f64 (*.f64 g (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (*.f64 (*.f64 h h) #s(literal -1 binary64))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (* (+ g h) (- g h)) (*.f64 #s(literal -1 binary64) (*.f64 h h)))
#s(approx (* (+ g h) (- g h)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h)))))
#s(approx (* (+ g h) (- g h)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 g (+.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h))))))
#s(approx (+ g h) h)
#s(approx (+ g h) (+.f64 g h))
#s(approx (- g h) (*.f64 #s(literal -1 binary64) h))
#s(approx (- g h) (-.f64 g h))
#s(approx (- (* g g) (* h h)) (*.f64 #s(literal -1 binary64) (*.f64 h h)))
#s(approx (- (* g g) (* h h)) (-.f64 (*.f64 g g) (*.f64 h 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))))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (cbrt.f64 #s(literal -1/4 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 10 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (cbrt.f64 #s(literal -1/4 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 10 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 16 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (cbrt.f64 #s(literal -1/4 binary64))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 13 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 13 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/576 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 13 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 5 binary64))))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) a)) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g))))) g))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) a)) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))))) g))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 h #s(literal 8 binary64))) (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 8 binary64)))) (*.f64 a (pow.f64 g #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) a)) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64)))))))) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g)))) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 4 binary64)))))) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 h #s(literal 8 binary64))) (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 8 binary64)))) (pow.f64 g #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 4 binary64))))))) g))
#s(approx (sqrt (- (* g g) (* h h))) g)
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 6 binary64)))))))))
#s(approx (+ g (* -1/2 (/ (* h h) g))) g)
#s(approx (+ g (* -1/2 (/ (* h h) g))) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 20 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 g g) a) (/.f64 (pow.f64 h #s(literal 4 binary64)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 g a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 g (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g))))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 g (-.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))))) (pow.f64 a #s(literal -1 binary64)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a a) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) g))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (cbrt.f64 #s(literal -1/4 binary64)) g))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (cbrt.f64 #s(literal -1/4 binary64)) g))) (*.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g)) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (cbrt.f64 #s(literal -1/4 binary64)) g))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a)) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g)) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -2 binary64)))))))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -2 binary64) g))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) #s(literal 2 binary64))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 g (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g)))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 g (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 6 binary64)))) (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (cbrt.f64 #s(literal 1/4 binary64)) g)))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal -2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (cbrt.f64 #s(literal 1/4 binary64)) g))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 g (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/48 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal 2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64)) #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (cbrt.f64 #s(literal 1/4 binary64)) g)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt.f64 (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) #s(literal 1/4 binary64))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal -2 binary64)))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) #s(literal 1/4 binary64)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/48 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 g (cbrt.f64 #s(literal 1/4 binary64))) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) #s(literal 1/4 binary64))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) a)) (+.f64 (*.f64 #s(literal 1/1728 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 5 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal -5 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/48 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 g #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) a)) (*.f64 #s(literal 1/48 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 1/4 binary64)) #s(literal -1 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 g (cbrt.f64 #s(literal 1/4 binary64))) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) #s(literal 1/4 binary64)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)))) (*.f64 #s(literal 1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h h) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/4 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)))) (*.f64 #s(literal 1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h h) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/4 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal 1/18 binary64) (/.f64 (+.f64 (*.f64 #s(literal -6 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)))) (*.f64 #s(literal 1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h h) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (*.f64 #s(literal 1/4 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (log.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (-.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h h) (*.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (-.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h h) (*.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (-.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h h) (*.f64 g (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (+.f64 (*.f64 #s(literal -6 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (+.f64 h (*.f64 #s(literal -1 binary64) h))) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 a g)))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 a g))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (*.f64 a (pow.f64 g #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 a g)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (*.f64 g g))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g))))))
#s(approx (sqrt (* (+ g h) (- g h))) g)
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g)))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) (*.f64 g g))))))))
#s(approx (* (+ g h) (- g h)) (*.f64 g g))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 g g) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) (/.f64 h g)))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 g g) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (/.f64 h g))))))
#s(approx (+ g h) g)
#s(approx (+ g h) (*.f64 g (+.f64 #s(literal 1 binary64) (/.f64 h g))))
#s(approx (- g h) g)
#s(approx (- g h) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 h g)))))
#s(approx (- (* g g) (* h h)) (*.f64 g g))
#s(approx (- (* g g) (* h h)) (*.f64 (*.f64 g g) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h h) (*.f64 g 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a)) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) g)) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a)) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) g)) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 8 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (pow.f64 h #s(literal 4 binary64)) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (pow.f64 g #s(literal 20 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) a)) (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 g g) a) (/.f64 (pow.f64 h #s(literal 4 binary64)) #s(literal 2 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) #s(literal 1 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 g a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))) (pow.f64 a #s(literal -1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (pow.f64 a #s(literal -1 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a (*.f64 g g)))) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 6 binary64))))) (pow.f64 a #s(literal -1 binary64))))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -2 binary64) g))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 6 binary64))))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) g))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g)))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 6 binary64))))))))))
#s(approx (+ g (* -1/2 (/ (* h h) g))) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h h) (*.f64 g g))) #s(literal 1 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 8 binary64)) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/576 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (/.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 14 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) a))) g)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) a)))) g)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (*.f64 g g)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 h #s(literal 8 binary64))) (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 8 binary64)))) (*.f64 a (pow.f64 g #s(literal 6 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) a))))) g)))
#s(approx (neg (* (pow (/ g a) 1/3) 1)) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))
#s(approx (* (pow (/ g a) 1/3) 1) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (pow (/ g a) 1/3) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) g)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 0 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) (pow.f64 g #s(literal 3 binary64))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 h (*.f64 #s(literal -1 binary64) h))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 4 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 0 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) #s(literal -1 binary64)))))) g))) (pow.f64 g #s(literal 3 binary64))))))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1/4 binary64)))))
#s(approx (cbrt (/ (/ (* h h) a) g)) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g))) (*.f64 #s(literal -1/2 binary64) (*.f64 h h))) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g))))) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 h #s(literal 8 binary64))) (*.f64 #s(literal 1/16 binary64) (pow.f64 h #s(literal 8 binary64)))) (pow.f64 g #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 h h)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 g g))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 g #s(literal 4 binary64))))))) g)))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 g #s(literal 0 binary64)) a) #s(literal 1/2 binary64)))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (*.f64 g g) #s(literal 0 binary64))) #s(literal -1 binary64))) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) g)) (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 g g) (pow.f64 h #s(literal 8 binary64))) a)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (*.f64 g g) #s(literal 0 binary64))) #s(literal -1 binary64))) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) g)) (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 g #s(literal 0 binary64)) a) #s(literal 1/2 binary64)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 0 binary64))) #s(literal -1 binary64))) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 0 binary64)))) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 g (*.f64 a #s(literal 0 binary64)))) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) a))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -1 binary64))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 g #s(literal 0 binary64)))) (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) a))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -1 binary64)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal 0 binary64))) (/.f64 (*.f64 h h) #s(literal 0 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal 0 binary64)))) g)) (*.f64 #s(literal 1/6 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 0 binary64)))) g)) (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) a))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -1 binary64)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/18 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) #s(literal 0 binary64))) (+.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) #s(literal 0 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 0 binary64)) #s(literal 3 binary64))))) g)) (*.f64 #s(literal 1/6 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal 0 binary64))) (/.f64 (*.f64 h h) #s(literal 0 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal 0 binary64)))))) g)) (*.f64 #s(literal 1/6 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 0 binary64)))) g)) (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) a))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -1 binary64)))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) a))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -1 binary64)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) a))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 g #s(literal 0 binary64)))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) a))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal 0 binary64))) (/.f64 (*.f64 h h) #s(literal 0 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal 0 binary64)))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 0 binary64)))) g)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) a))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) g) #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) #s(literal 0 binary64))) (+.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) #s(literal 0 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 0 binary64)) #s(literal 3 binary64))))) g)) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal 0 binary64))) (/.f64 (*.f64 h h) #s(literal 0 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal 0 binary64)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 0 binary64)))) g)))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 g #s(literal 0 binary64)) a)))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (*.f64 a g))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) a))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a g))) (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) a))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 a (*.f64 g #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) a))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) a))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 #s(literal -1 binary64) (*.f64 g #s(literal 0 binary64))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) #s(literal -1 binary64))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 g #s(literal -1 binary64))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) g)) #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 g #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 h h) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) g)) (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h)))) g)) #s(literal -1 binary64)))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 g g) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (/.f64 (*.f64 h h) g)) g)))))
#s(approx (+ g h) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 h g)) #s(literal 1 binary64)))))
#s(approx (- g h) (*.f64 #s(literal -1 binary64) (*.f64 g (-.f64 (/.f64 h g) #s(literal 1 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 13 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/216 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 6 binary64)))) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64)))) (*.f64 (*.f64 g g) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))) (*.f64 (pow.f64 h #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 13 binary64))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1/4 binary64))) (*.f64 (pow.f64 h #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 7 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) (pow.f64 (*.f64 g h) #s(literal 2 binary64)))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/192 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) (*.f64 (*.f64 h h) #s(literal -1/2 binary64)))) #s(literal -1 binary64))) (*.f64 #s(literal 5/128 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 7 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/48 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 13 binary64)) (pow.f64 h #s(literal 4 binary64)))))) (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal -1/2 binary64)) #s(literal 2 binary64)))))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 5 binary64))))) (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -5/256 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 7 binary64))))) (*.f64 #s(literal 1/32 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -5/128 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 7 binary64)))) (*.f64 #s(literal 1/16 binary64) (pow.f64 g #s(literal -5 binary64))))) (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64)))))))
#s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 (*.f64 h h) (-.f64 (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64)))))))
#s(approx (+ g (* -1/2 (/ (* h h) g))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))
#s(approx (* h h) (*.f64 h h))
#s(approx h h)
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (*.f64 h h) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64)))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (*.f64 h h) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/216 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 6 binary64)))) #s(literal -1 binary64))) (+.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64)))) (*.f64 (*.f64 g g) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g a)) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g a)) (*.f64 (*.f64 h h) (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 5 binary64))))) (*.f64 #s(literal 1/16 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 a g) #s(literal -1 binary64)))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (+.f64 (cbrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))) a))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 g g)))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 5 binary64))) (pow.f64 g #s(literal 11 binary64)))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))))) (pow.f64 g #s(literal 3 binary64))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (*.f64 g g)))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 a #s(literal 14 binary64)) (pow.f64 g #s(literal 11 binary64)))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 8 binary64))) (pow.f64 g #s(literal 14 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 1 binary64) (pow.f64 a #s(literal 34 binary64))) (pow.f64 g #s(literal 19 binary64)))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (/.f64 (cbrt.f64 #s(literal 1/2 binary64)) a) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 h h) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g)))) g))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 h (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))) (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64)))) (*.f64 h (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/216 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (pow.f64 a #s(literal 7 binary64)) (pow.f64 g #s(literal 11 binary64))))) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 g #s(literal 14 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -5 binary64))) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/12 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (pow.f64 a #s(literal 17 binary64)) (pow.f64 g #s(literal 19 binary64))) #s(literal -1 binary64))) #s(literal 1/9 binary64))) (*.f64 (cbrt.f64 (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))))
#s(approx (/ (* h h) a) (/.f64 (*.f64 h h) a))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h h) g)) (*.f64 #s(literal 2 binary64) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) g)))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (-.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 h h) (pow.f64 g #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 g #s(literal -3 binary64))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))) (*.f64 #s(literal 2 binary64) g)))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64)))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 (/.f64 h a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 g a) #s(literal -1 binary64))) (*.f64 (*.f64 h h) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 g #s(literal 5 binary64))) #s(literal -1 binary64))) (/.f64 (cbrt.f64 #s(literal -1/2 binary64)) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 g g))) (/.f64 (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 3 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 a (pow.f64 g #s(literal 3 binary64))) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))))))))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 h #s(literal 3 binary64)) a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 (/.f64 h a) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64)))))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (+.f64 (cbrt.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))) (*.f64 (pow.f64 h #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64)))) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 (/.f64 h a) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) (*.f64 g g))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 4 binary64))))) g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g)) (cbrt.f64 (pow.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 h h) a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))) #s(literal -2 binary64)))))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (*.f64 #s(literal 1/6 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (pow.f64 g #s(literal 4 binary64)))) (pow.f64 g #s(literal -2 binary64))))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (*.f64 h (+.f64 (*.f64 #s(literal 1/18 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -6 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 (*.f64 g g) (+.f64 g (*.f64 #s(literal -1 binary64) g))))))))) (*.f64 #s(literal 1/6 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (pow.f64 g #s(literal 4 binary64)))) (pow.f64 g #s(literal -2 binary64)))))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (log.f64 (*.f64 h (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 h) (+.f64 (log.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 h) (+.f64 (log.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g)))) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (*.f64 #s(literal 1/2 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (pow.f64 g #s(literal 4 binary64)))) (pow.f64 g #s(literal -2 binary64)))))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 h) (+.f64 (log.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g)))) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -6 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (+.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 (*.f64 g g) (+.f64 g (*.f64 #s(literal -1 binary64) g))))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (pow.f64 g #s(literal 4 binary64)))) (pow.f64 g #s(literal -2 binary64))))))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g))) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 h a) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64))))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a g))) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (*.f64 a g))) (*.f64 h (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 h a) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g)))) g))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) a) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (pow.f64 g #s(literal 3 binary64))))))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) g)))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64)))))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64))) (pow.f64 g #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g))) (pow.f64 g #s(literal 3 binary64)))))))))))
#s(approx (sqrt (* (+ g h) (- g h))) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) g))))
#s(approx (sqrt (* (+ g h) (- g h))) (+.f64 g (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g))))) g)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g))))))
#s(approx (sqrt (* (+ g h) (- g h))) (+.f64 g (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) g)) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) g)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 h (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) (*.f64 g g)))) (+.f64 g (*.f64 #s(literal -1 binary64) g)))) (pow.f64 g #s(literal 3 binary64))))))))))
#s(approx (* (+ g h) (- g h)) (+.f64 (*.f64 h (+.f64 g (*.f64 #s(literal -1 binary64) g))) (*.f64 g g)))
#s(approx (* (+ g h) (- g h)) (+.f64 (*.f64 h (+.f64 g (+.f64 (*.f64 #s(literal -1 binary64) g) (*.f64 #s(literal -1 binary64) h)))) (*.f64 g g)))
#s(approx (- g h) (+.f64 g (*.f64 #s(literal -1 binary64) h)))
#s(approx (- (* g g) (* h h)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 g 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))))))) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 g h)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 g h))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 g h))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 g #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (+ g (* -1/2 (/ (* h h) g))) (*.f64 (*.f64 h h) (-.f64 (/.f64 g (*.f64 h h)) (*.f64 #s(literal 1/2 binary64) (pow.f64 g #s(literal -1 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 14 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g (*.f64 a h))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))) a))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 h (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64)))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (pow.f64 h #s(literal 4 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) (pow.f64 h #s(literal 5 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (pow.f64 h #s(literal 4 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))))) (pow.f64 h #s(literal 3 binary64)))))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 g h)) (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 g h)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g h))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 h (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (*.f64 h (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (*.f64 h (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (*.f64 h (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 11 binary64))) #s(literal -1 binary64))) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))))) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 h))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 h))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 a h) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 g g) #s(literal -1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 h h))) (+.f64 (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 h))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 a h) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal 1/18 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (*.f64 a (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (+.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 g g) #s(literal -1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 h h))) (+.f64 (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 h))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 a h) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 h)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 h))) (*.f64 (/.f64 a h) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) (sqrt.f64 #s(literal -1 binary64)))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 h))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 g g) #s(literal -1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 h h))) (*.f64 (/.f64 a h) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 h))) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (*.f64 a (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (+.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 g g) #s(literal -1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal 1 binary64)))) (*.f64 h h))) (*.f64 (/.f64 a h) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) h)))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 h (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) h))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 h (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 a (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) h)))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 g h))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))) (/.f64 g h))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 h (-.f64 (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))) (/.f64 g h))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 h h) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g h)) (/.f64 g h)) #s(literal 1 binary64))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 h h) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 g h)) (+.f64 (/.f64 g h) (/.f64 (*.f64 g g) (*.f64 h h)))) #s(literal 1 binary64))))
#s(approx (+ g h) (*.f64 h (+.f64 #s(literal 1 binary64) (/.f64 g h))))
#s(approx (- g h) (*.f64 h (-.f64 (/.f64 g h) #s(literal 1 binary64))))
#s(approx (- (* g g) (* h h)) (*.f64 (*.f64 h h) (-.f64 (/.f64 (*.f64 g g) (*.f64 h h)) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) h)) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))))))))) h)) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))))))) h)) (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal 1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 g (*.f64 a h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g a)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (*.f64 (*.f64 h h) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 g a))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 g h)))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 g g) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) g) h))))))
#s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (*.f64 h h) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (sqrt.f64 #s(literal -1 binary64))))) h)) g) h))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 g #s(literal 6 binary64)) (*.f64 (pow.f64 h #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 (*.f64 h h) (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal -1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 h h) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 g h) #s(literal 2 binary64)) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))))))) h)) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a)) (*.f64 #s(literal 1/2 binary64) (/.f64 g (*.f64 a h)))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 g a)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 g g) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 a (*.f64 (*.f64 h h) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 g a))) h)) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal -1 binary64))) (*.f64 h h)) #s(literal 1/2 binary64))))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) h)) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (+.f64 g (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 a a) (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64)))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) (pow.f64 h #s(literal 3 binary64))))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 h #s(literal 4 binary64))) #s(literal -1 binary64))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))))))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal -1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (*.f64 (cbrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))))))) h))) (pow.f64 h #s(literal 3 binary64))))))))
#s(approx (* (cbrt (/ (/ (* h h) a) g)) (cbrt -1/4)) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a g))) (cbrt.f64 #s(literal 1/4 binary64)))))
#s(approx (cbrt (/ (/ (* h h) a) g)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 h h) (*.f64 a g)) #s(literal -1 binary64)))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (/.f64 g h) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) g) h)) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (- (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 g #s(literal 4 binary64)) (*.f64 (*.f64 h h) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 g g) (sqrt.f64 #s(literal -1 binary64))))) h)) g) h)) (sqrt.f64 #s(literal -1 binary64))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64)))))) h)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (*.f64 (*.f64 g g) (cbrt.f64 #s(literal -1/2 binary64))))))) h)) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (*.f64 g (cbrt.f64 #s(literal -1/2 binary64))))))) (pow.f64 h #s(literal 3 binary64)))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64))))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a) #s(literal 1/2 binary64)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 h #s(literal 5 binary64)) #s(literal -1 binary64))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (cbrt.f64 (/.f64 h (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 11/2 binary64))))) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) h)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cbrt.f64 (/.f64 (pow.f64 h #s(literal 4 binary64)) (*.f64 a #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (pow.f64 h #s(literal 3 binary64)))) (cbrt.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 a (*.f64 h h))) #s(literal 1/2 binary64)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -1 binary64))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (/.f64 a h) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -1 binary64)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 g g) #s(literal -1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal 1 binary64)))) h)) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -1 binary64)))))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/18 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (*.f64 a (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (+.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) h)) (*.f64 #s(literal 1/6 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 g g) #s(literal -1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) h)) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -1 binary64)))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -1 binary64)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 a h) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 g g) #s(literal -1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal 1 binary64)))) h)) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) (sqrt.f64 #s(literal -1 binary64)))) h)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))) (+.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) h) #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (/.f64 (*.f64 a (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (+.f64 (*.f64 #s(literal -3/2 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) h)) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 g g) #s(literal -1 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal 1 binary64)))))) h)) (/.f64 (*.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a))) (sqrt.f64 #s(literal -1 binary64)))) h)))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h (sqrt.f64 #s(literal -1 binary64))) a)))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 a (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 a (sqrt.f64 #s(literal -1 binary64)))))) h)) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 a (sqrt.f64 #s(literal -1 binary64))))) (/.f64 g a)))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) a))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64)))) g) h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) g) h))))))
#s(approx (+ (sqrt (* (+ g h) (- g h))) (neg g)) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) g) h))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (*.f64 h (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 h (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) h))))))
#s(approx (sqrt (* (+ g h) (- g h))) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 h (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 g g) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) h)) (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) (sqrt.f64 #s(literal -1 binary64))))) h))))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (*.f64 #s(literal -1 binary64) g)) h)) #s(literal 1 binary64))))
#s(approx (* (+ g h) (- g h)) (*.f64 (*.f64 h h) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 g (+.f64 (*.f64 #s(literal -1 binary64) g) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 g g) h)))) h)) #s(literal 1 binary64))))
#s(approx (+ g h) (*.f64 #s(literal -1 binary64) (*.f64 h (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 g h)) #s(literal 1 binary64)))))
#s(approx (- g h) (*.f64 #s(literal -1 binary64) (*.f64 h (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 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))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g)) #s(literal 1/2 binary64)))) a))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a)))
#s(approx (/ 1 (* 2 a)) (/.f64 #s(literal 1/2 binary64) a))
#s(approx (* 2 a) (*.f64 #s(literal 2 binary64) a))
#s(approx a a)
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))))
#s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a)))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal 1/2 binary64)))) a))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal -1/2 binary64)))) a)))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) #s(literal 1/2 binary64)))) a))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g))) (neg.f64 (log.f64 a)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g))) (neg.f64 (log.f64 a))))
#s(approx (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)))
#s(approx (/ 1/2 a) (/.f64 #s(literal 1/2 binary64) 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))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (*.f64 #s(literal 1/3 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g))) (neg.f64 (log.f64 a)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g))) (neg.f64 (log.f64 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))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))) g) a) #s(literal 1/2 binary64))))
#s(approx (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))))
#s(approx (neg (* (pow (/ g a) 1/3) 1)) (*.f64 #s(literal -1 binary64) (*.f64 (cbrt.f64 (/.f64 g a)) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))
#s(approx (* (pow (/ g a) 1/3) 1) (*.f64 (cbrt.f64 (/.f64 g a)) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
#s(approx (pow (/ g a) 1/3) (*.f64 (cbrt.f64 (/.f64 g a)) (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
#s(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))))))
#s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (*.f64 (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal 1/2 binary64)))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (*.f64 (pow.f64 (cbrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1/2 binary64)))))))
#s(approx (+ (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (exp (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3)) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64))))
#s(approx (* (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) 1/3) (*.f64 #s(literal 1/3 binary64) (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) (/.f64 #s(literal -1 binary64) a)))))
#s(approx (log (* (/ 1/2 a) (+ (sqrt (* (+ g h) (- g h))) (neg g)))) (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) (/.f64 #s(literal -1 binary64) a))))

eval140.0ms (1.6%)

Memory
-5.8MiB live, 240.8MiB allocated; 57ms collecting garbage
Compiler

Compiled 68 429 to 5 707 computations (91.7% saved)

prune62.0ms (0.7%)

Memory
10.1MiB live, 105.7MiB allocated; 5ms collecting garbage
Pruning

32 alts after pruning (29 fresh and 3 done)

PrunedKeptTotal
New71911730
Fresh21820
Picked415
Done022
Total72532757
Accuracy
97.7%
Counts
757 → 32
Alt Table
Click to see full alt table
StatusAccuracyProgram
65.3%
(/.f64 (+.f64 (pow.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64))))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))))) (*.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))))))))
27.5%
(+.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))) #s(literal 1/3 binary64)) (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)))))))
43.6%
(+.f64 (*.f64 (cbrt.f64 (/.f64 #s(literal 1/2 binary64) a)) (cbrt.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) (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)))))))
31.8%
(+.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))) (cbrt.f64 (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))))
27.1%
(+.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (cbrt.f64 (*.f64 #s(approx (/ 1 (* 2 a)) (/.f64 #s(literal 1/2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))))
45.3%
(+.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)))))) (*.f64 (cbrt.f64 (/.f64 #s(literal 1/2 binary64) a)) (cbrt.f64 (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))
10.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 (pow.f64 (*.f64 g g) #s(literal 3 binary64)) (pow.f64 (*.f64 h h) #s(literal 3 binary64))) (+.f64 (pow.f64 g #s(literal 4 binary64)) (+.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (*.f64 g h) #s(literal 2 binary64))))))))))
63.2%
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) #s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -2 binary64) g)))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))))
66.9%
(+.f64 (cbrt.f64 (*.f64 #s(approx (/ 1 (* 2 a)) (/.f64 #s(literal 1/2 binary64) a)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
23.4%
(+.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))) (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)))))))
63.2%
(+.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
87.5%
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))) (cbrt.f64 (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))))
66.8%
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))))
11.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))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 #s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g)))) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
32.8%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 #s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))) a))
40.6%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 #s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 a (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))) a))
17.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))))))) (/.f64 #s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))))) a))
40.6%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
36.5%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (pow.f64 (/.f64 g a) #s(literal 1/3 binary64)) #s(literal 1 binary64))))
48.3%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (pow.f64 g #s(literal 1/3 binary64)) (cbrt.f64 a)) #s(literal 1 binary64))))
42.9%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (pow.f64 a #s(literal 1/3 binary64))) #s(literal 1 binary64))))
95.9%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64))))
36.5%
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 g a)) #s(literal 1/3 binary64))) #s(literal 1 binary64))))
72.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))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))))
45.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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 (cbrt.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) (cbrt.f64 a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
43.6%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (cbrt.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) (cbrt.f64 a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
23.8%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) #s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 g #s(literal 0 binary64)) a) #s(literal -1/2 binary64)))))))))
40.5%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
33.5%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (/.f64 (+.f64 (pow.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))) (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))))))
35.0%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g)))) (cbrt.f64 #s(literal 1/2 binary64))))))))
18.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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (exp.f64 (*.f64 (log.f64 g) #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))))
35.3%
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 #s(approx (cbrt (* (/ 0 (* a (* g g))) -1/2)) #s(literal 0 binary64)) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))))
Compiler

Compiled 7 066 to 1 844 computations (73.9% saved)

regimes125.0ms (1.4%)

Memory
-17.7MiB live, 124.6MiB allocated; 8ms collecting garbage
Counts
58 → 1
Calls
Call 1
Inputs
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g 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))))))) (neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (pow.f64 (/.f64 g a) #s(literal 1/3 binary64)) #s(literal 1 binary64))))
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 #s(approx (cbrt (* (/ 0 (* a (* g g))) -1/2)) #s(literal 0 binary64)) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (pow.f64 a #s(literal 1/3 binary64))) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (pow.f64 g #s(literal 1/3 binary64)) (cbrt.f64 a)) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 g a)) #s(literal 1/3 binary64))) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 #s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))) 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))))))) (/.f64 #s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 (cbrt.f64 (*.f64 (*.f64 a a) g)) (cbrt.f64 #s(literal -1 binary64)))) a))
(+.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 h h) (*.f64 a g))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) #s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 #s(literal -2 binary64) g)))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g 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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))))
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))))
(+.f64 (cbrt.f64 (*.f64 #s(approx (/ 1 (* 2 a)) (/.f64 #s(literal 1/2 binary64) a)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
(+.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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (+.f64 g (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 h h) g))))))) (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (neg.f64 g) a))))
(+.f64 (cbrt.f64 #s(approx (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g a)))) (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 (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 #s(approx (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 h h)) (*.f64 g 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))))))) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 #s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))))) 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))))))) (/.f64 #s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal 0 binary64)) (*.f64 g g)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 g g)) #s(literal -1/2 binary64))))))) 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))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) #s(approx (+ (neg g) (sqrt (- (* g g) (* h h)))) (*.f64 (/.f64 (*.f64 h h) g) #s(literal -1/2 binary64))))) (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 (pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g))) #s(literal 1/3 binary64)) (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)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 #s(approx (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 a (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))) 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))))))) (/.f64 #s(approx (+ (* (cbrt (* (- (sqrt (* (+ g h) (- g h))) g) (* a a))) (cbrt 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) (*.f64 a (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a) #s(literal 1/2 binary64)))))) a))
(+.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)))))))
(+.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 #s(approx (- (* g g) (* h h)) (*.f64 (-.f64 (/.f64 (*.f64 g g) (*.f64 h h)) #s(literal 1 binary64)) (*.f64 h 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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g)))) (cbrt.f64 #s(literal 1/2 binary64))))))))
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) 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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) #s(approx (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)) (*.f64 #s(literal -1 binary64) (cbrt.f64 (*.f64 (/.f64 (*.f64 g #s(literal 0 binary64)) a) #s(literal -1/2 binary64)))))))))
(+.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (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)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 (+.f64 (*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 #s(approx (* (+ g h) (- g h)) (*.f64 g g))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) 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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (cbrt.f64 (*.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a) #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 (+.f64 (*.f64 (cbrt.f64 (*.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a))) (cbrt.f64 #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) a))
(+.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)))))) (*.f64 (cbrt.f64 (/.f64 #s(literal 1/2 binary64) a)) (cbrt.f64 (-.f64 (neg.f64 g) (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))))))
(+.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (cbrt.f64 (*.f64 #s(approx (/ 1 (* 2 a)) (/.f64 #s(literal 1/2 binary64) a)) (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h)))))))
(+.f64 (*.f64 (cbrt.f64 (/.f64 #s(literal 1/2 binary64) a)) (cbrt.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) (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 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (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)))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 (+.f64 (cbrt.f64 (*.f64 (*.f64 #s(approx (- (sqrt (* (+ g h) (- g h))) g) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 h (*.f64 #s(literal -1 binary64) h))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 h h)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) #s(literal 2 binary64)))) g)))) (*.f64 a a)) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (*.f64 (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) (*.f64 a a)) #s(literal -1/2 binary64)))) 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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (exp.f64 (*.f64 (log.f64 g) #s(literal 2 binary64))))) #s(literal 1/2 binary64))))))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))))) (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) (*.f64 #s(literal -1 binary64) 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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
(+.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a)) (+.f64 (neg.f64 g) (exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 g h) (-.f64 g h))) #s(literal 1/2 binary64)))))) (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 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))) (cbrt.f64 (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) 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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (cbrt.f64 (/.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h)))) a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (cbrt.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g)) (cbrt.f64 a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 (cbrt.f64 (+.f64 g (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))))) (cbrt.f64 a)) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
(+.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) a) (+.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) (neg.f64 g)))) #s(literal 1/3 binary64))) (*.f64 (cbrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64))) (cbrt.f64 (-.f64 (neg.f64 g) (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h 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))))))) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (*.f64 h h) (*.f64 a (pow.f64 g #s(literal 4 binary64))))) (cbrt.f64 #s(literal -1/4 binary64))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (*.f64 (+.f64 (*.f64 (cbrt.f64 #s(literal -1/4 binary64)) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) (pow.f64 g #s(literal 4 binary64))))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))))) 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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 g (+.f64 (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 g g)) #s(literal -1 binary64))) (cbrt.f64 #s(literal -1 binary64))) (*.f64 (cbrt.f64 (/.f64 (+.f64 h (*.f64 #s(literal -1 binary64) h)) a)) (/.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) 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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(approx (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (*.f64 #s(literal -1 binary64) (*.f64 g (+.f64 (cbrt.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cbrt.f64 (pow.f64 (*.f64 a (*.f64 (pow.f64 g #s(literal 5 binary64)) #s(literal 4 binary64))) #s(literal -1 binary64))) (+.f64 h (*.f64 #s(literal -1 binary64) h)))))))) (cbrt.f64 #s(literal 1/2 binary64))) (*.f64 (cbrt.f64 (/.f64 (-.f64 (sqrt.f64 (*.f64 (+.f64 g h) (-.f64 g h))) g) a)) (cbrt.f64 #s(literal -1/2 binary64)))))))
(+.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 (pow.f64 (*.f64 g g) #s(literal 3 binary64)) (pow.f64 (*.f64 h h) #s(literal 3 binary64))) (+.f64 (pow.f64 g #s(literal 4 binary64)) (+.f64 (pow.f64 h #s(literal 4 binary64)) (pow.f64 (*.f64 g h) #s(literal 2 binary64))))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (pow.f64 (*.f64 (pow.f64 g #s(literal 5 binary64)) a) #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal -1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (cbrt.f64 #s(literal -1 binary64)) (cbrt.f64 (/.f64 g a)))) (*.f64 (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g)) (cbrt.f64 #s(literal -1/4 binary64)))))
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (/.f64 (+.f64 (pow.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))) (*.f64 (cbrt.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 g g))) #s(literal -1/2 binary64))) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))))))
(/.f64 (+.f64 (pow.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64))))) (-.f64 (*.f64 (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g)))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) g))))) (*.f64 #s(approx (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt.f64 (*.f64 (/.f64 (/.f64 (*.f64 h h) a) g) #s(literal -1/4 binary64)))) (cbrt.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) a) #s(literal -1 binary64)) (-.f64 (neg.f64 g) #s(approx (sqrt (- (* g g) (* h h))) 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))))))) (*.f64 (neg.f64 g) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (cbrt.f64 #s(literal -1 binary64))) (cbrt.f64 (/.f64 (/.f64 (*.f64 h h) a) g))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cbrt.f64 (/.f64 (pow.f64 g #s(literal 4 binary64)) a))) (/.f64 (*.f64 (*.f64 h h) (cbrt.f64 #s(literal 1/2 binary64))) (pow.f64 (cbrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 (cbrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (cbrt.f64 (*.f64 (*.f64 g g) (/.f64 (pow.f64 h #s(literal 8 binary64)) a)))))) (pow.f64 g #s(literal 3 binary64))))) g)) (*.f64 (cbrt.f64 (pow.f64 (*.f64 (*.f64 g g) a) #s(literal -1 binary64))) #s(literal 1 binary64)))))
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))))))) (neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64))))
Calls

7 calls:

28.0ms
(*.f64 #s(literal 2 binary64) a)
19.0ms
g
14.0ms
a
14.0ms
h
14.0ms
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))
Results
AccuracySegmentsBranch
95.9%1(*.f64 h h)
95.9%1(*.f64 #s(literal 2 binary64) a)
95.9%1(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))
95.9%1(+.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)))))))
95.9%1g
95.9%1h
95.9%1a
Compiler

Compiled 51 to 44 computations (13.7% saved)

regimes14.0ms (0.2%)

Memory
-26.7MiB live, 20.6MiB allocated; 1ms collecting garbage
Counts
4 → 2
Calls
Call 1
Inputs
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g 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))))))) (neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (pow.f64 (/.f64 g a) #s(literal 1/3 binary64)) #s(literal 1 binary64))))
#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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 #s(approx (cbrt (* (/ 0 (* a (* g g))) -1/2)) #s(literal 0 binary64)) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))))
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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 #s(approx (cbrt (* (/ 0 (* a (* g g))) -1/2)) #s(literal 0 binary64)) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64))))))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))))
Calls

7 calls:

3.0ms
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))
2.0ms
a
2.0ms
(*.f64 #s(literal 2 binary64) a)
2.0ms
(+.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)))))))
2.0ms
g
Results
AccuracySegmentsBranch
74.1%2(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))
72.4%1(*.f64 h h)
75.7%2(+.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)))))))
72.4%1g
72.4%1h
72.4%1(*.f64 #s(literal 2 binary64) a)
72.4%1a
Compiler

Compiled 51 to 44 computations (13.7% saved)

regimes7.0ms (0.1%)

Memory
10.8MiB live, 10.8MiB allocated; 0ms collecting garbage
Accuracy

Total -23.0b remaining (-130.3%)

Threshold costs -23b (-130.3%)

Counts
3 → 1
Calls
Call 1
Inputs
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g 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))))))) (neg.f64 (*.f64 (cbrt.f64 (/.f64 g a)) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (pow.f64 (/.f64 g a) #s(literal 1/3 binary64)) #s(literal 1 binary64))))
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))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))))
Calls

4 calls:

2.0ms
(+.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)))))))
2.0ms
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))
1.0ms
h
1.0ms
g
Results
AccuracySegmentsBranch
72.4%1g
72.4%1h
72.4%1(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))
72.4%1(+.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)))))))
Compiler

Compiled 44 to 32 computations (27.3% saved)

bsearch1.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-5.869361101677452e+98
-2.869148037214695e+97
Compiler

Compiled 40 to 25 computations (37.5% saved)

simplify42.0ms (0.5%)

Memory
-11.2MiB live, 36.0MiB allocated; 1ms collecting garbage
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
095310
1204292
2534292
32152288
Stop Event
node limit
Calls
Call 1
Inputs
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64))))
(if (<=.f64 (+.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))))))) #s(literal -499999999999999983668084402058345636924766592903277736458980889735647922960863931304369934227734528 binary64)) #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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 #s(approx (cbrt (* (/ 0 (* a (* g g))) -1/2)) #s(literal 0 binary64)) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))) #s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g 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))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))))
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))))))) (neg.f64 (*.f64 (/.f64 (cbrt.f64 g) (cbrt.f64 a)) #s(literal 1 binary64))))
#s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (/.f64 (neg.f64 (cbrt.f64 g)) (cbrt.f64 a)))
(if (<=.f64 (+.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))))))) #s(literal -499999999999999983668084402058345636924766592903277736458980889735647922960863931304369934227734528 binary64)) #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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 #s(approx (cbrt (* (/ 0 (* a (* g g))) -1/2)) #s(literal 0 binary64)) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))) #s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a))))))
(if (<=.f64 (+.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 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) a))) (+.f64 g (sqrt.f64 (-.f64 (*.f64 g g) (*.f64 h h))))))) #s(literal -499999999999999983668084402058345636924766592903277736458980889735647922960863931304369934227734528 binary64)) #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(approx (/ (+ (cbrt (* (* (- (sqrt (* (+ g h) (- g h))) g) (* a a)) 1/2)) (cbrt (* (* (+ (sqrt (* (+ g h) (- g h))) g) (* a a)) -1/2))) a) #s(approx (* -1 (+ (* (cbrt (/ (+ g (sqrt (* (+ g h) (- g h)))) a)) (cbrt 1/2)) (* (cbrt (/ (- (sqrt (* (+ g h) (- g h))) g) a)) (cbrt -1/2)))) (*.f64 g (+.f64 #s(approx (cbrt (* (/ 0 (* a (* g g))) -1/2)) #s(literal 0 binary64)) (cbrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) (*.f64 a (*.f64 g g))) #s(literal 1/2 binary64)))))))) #s(approx (+ (cbrt (* (/ 1 (* 2 a)) (+ (neg g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (neg g) (sqrt (- (* g g) (* h h))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g 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))))))) (neg.f64 #s(approx (* (cbrt (/ g a)) 1) (cbrt.f64 (/.f64 g a)))))

derivations158.0ms (1.8%)

Memory
45.8MiB live, 95.7MiB allocated; 3ms collecting garbage
Stop Event
fuel
Compiler

Compiled 321 to 99 computations (69.2% saved)

preprocess46.0ms (0.5%)

Memory
-44.9MiB live, 48.6MiB allocated; 5ms collecting garbage
Remove

(abs h)

Compiler

Compiled 892 to 332 computations (62.8% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...